Скачать: CL | DM;

Ярлыки   Найти похожие ветки 

← →
nexus ©   (2002-07-08 16:32) [0]

Как загрузить на форму ярлыки. Клик на которого призводит
до запуска етого ярлыка.

---

← →
delta ©   (2002-07-08 17:48) [1]

Насчёт ярлыков не знаю но есть идейка: помещаешь на форму компонент Image или ImageList, подключаешь иконку, для обработчика OnClick пишеш:

procedure TForm1.Image1Click(Sender: TObject);
var TSI:TStartupInfo;
TPI:TProcessInformation;
begin
CreateProcess (nil,PChar("C:\Program Files\Far\Far.exe"), nil, nil, false,
normal_priority_class, nil, nil, TSI, TPI);
end;


Место моего Фара пишешь путь к программе которую нужно запустить.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.009 c