Как вручную вывести системный значок на свою форму выхода?

Alloc

Новичок
Приветствую!

Как вручную вывести системный значок на свою форму выхода? При этом сам значок брать непосредственно из винды?

 

South

Знаток
Проверенный
Код:
hIcon := ExtractIcon(0, ExpandConstant('{sys}\shell32.dll'), ИндексИконки);
with TBitmapImage.Create(ТвояФорма) do begin
  Parent:= ТвояФорма;
  ...
  Bitmap.Width:= Ширина;
  Bitmap.Height:= Высота;

  DrawIconEx(Bitmap.Canvas.Handle, 0, 0, hIcon, Ширина, Высота, 0, 0, 3);
  ...
end
не?
 
Последнее редактирование:
Сверху