Как показать значок своего приложения на форме?

← →
Alice (2002-05-15 19:01) [0]

Пожалуйста, помогите!
Нужно показать значок своего приложения на форме.

← →
MBo © (2002-05-15 19:05) [1]

procedure TForm1.FormPaint(Sender: TObject);
var
MyIcon : TIcon;
begin
MyIcon := TIcon.Create;
try
MyIcon.Handle:=ExtractIcon(HInstance,pChar(Application.Exename),0);
Canvas.Draw(20,20,MyIcon);
finally
MyIcon.Free;
end;
end;

← →
Alice (2002-05-15 19:37) [2]

Спасибо.
А как расположить значок в определенном месте?
Например, посередине формы или в каком-нибудь другом месте формы.

← →
~Sergius (2002-05-15 22:10) [3]

неужели это такое нужное всем приложение, что кому-то вообще нужен его значок?
сужу по уровню предыдущего вопроса.

← →
~Sergius (2002-05-15 22:10) [4]

неужели это такое нужное всем приложение, что кому-то вообще нужен его значок? или какой-то эбаут..
сужу по уровню предыдущего вопроса.

← →
KaPaT © (2002-05-15 22:15) [5]

Хех....Canvas.Draw(X,Y,Icon) ;
X,Y - соответствующие координаты на форме =)

Нужно, автору

DrawIcon() ИМХО удобней.

Как показать значок своего приложения на форме? Найти похожие ветки