Внешний вид сайта:

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

Загрузка иконок из файла ресурсов. Создайте файл ресурсов, содержащий иконки, которые Вы хотите использовать, а потом используйте функцию 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;

—

02.09.2016

coder

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

Комментарии