Delphi - база знаний


Как использовать встроенные в Windows иконки в своём приложении?


Как использовать встроенные в 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;


clip0018

Взято с Исходников.ru



Начало  Назад  Вперед



Книжный магазин