Карта сайтаСсылкиКонтакты

Загрузка иконок из ресурсов во время выполнения программы

PDF Печать
Статьи

Загрузка иконок из файла ресурсов.

Создайте файл ресурсов, содержащий иконки, которые Вы хотите использовать, а потом используйте функцию LoadIcon() WinAPI Windows.


{$R MYRES.RES}

procedure TForm1.Button1Click(Sender: TObject);
var
  h : hIcon;
begin
  h := LoadIcon(hInstance, 'ICON_1');
  Application.Icon.Handle := h;
  InvalidateRect(Application.Handle, nil, true);
end;

По материалам http://delphi3000.com


 

Добавить комментарий


Защитный код
Обновить