Как использовать встроенные в Windows иконки в
своём приложении
Сперва необходимо узнать, константы, которые
соответствуют определённым иконкам. Все они
определены в API unit (windows.pas) в Delphi:
IDI_HAND
IDI_EXCLAMATION
or
IDI_QUESTION
Следующий пример рисует иконку вопроса на
панели:
var
DC: HDC;
Icon: HICON;
begin
DC:= GetWindowDC(Panel1.Handle);
Icon:= LoadIcon(0, IDI_QUESTION);
DrawIcon(DC, 5,5, Icon);
ReleaseDC(Panel1.Handle, DC);
end;
|