Добавить ярлык программы на форму

[RAVAL))]

Как добавить ярлык программы на форму?

[ViktorXP]

Сообщение от RAVAL))

Как добавить ярлык программы на форму?

картинку? путь ярлыка? или я чето не пойму.

[RAVAL))]

картинку, и чтоб при нажатии запускалась программа

[Terran]

Сообщение от RAVAL))

Как добавить ярлык программы на форму?

Если я правильно понял, то ваш вопрос можно решить так:

Uses
   ShellApi;
Procedure TForm1.Button1Click(Sender: TObject);
Var
A: Array[0..78] Of Char;
Begin
If OpenDialog1.Execute Then
Begin
StrPCopy(A,OpenDialog1.FileName);
Image1.Picture.Icon.Handle:=ExtractIcon(Hinstance,A,0);
End;
End;
Procedure TForm1.Image1Click(Sender: TObject);
Begin
ShellExecute(Application.Handle,'Open',PChar(OpenDialog1.FileName),Nil,Nil,SW_SHOWDEFAULT);
End;