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

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

← →
ShadoWFM ©   (2003-08-24 21:29) [0]

Как создать ярлык какой-нибудь проги на форме?????

---

← →
Anatoly Podgoretsky ©   (2003-08-24 21:52) [1]

ShellExecute

---

← →
default ©   (2003-08-24 22:04) [2]


Автор: Gavrilo

uses ShlObj, ComObj, ActiveX;

procedure CreateLink(const PathObj, PathLink, Desc, Param: string);
var
IObject: IUnknown;
SLink: IShellLink;
PFile: IPersistFile;
begin
IObject := CreateComObject(CLSID_ShellLink);
SLink := IObject as IShellLink;
PFile := IObject as IPersistFile;
with SLink do begin
SetArguments(PChar(Param));
SetDescription(PChar(Desc));
SetPath(PChar(PathObj));
end;
PFile.Save(PWChar(WideString(PathLink)), FALSE);
end;

http://forum.vingrad.ru

---

← →
DVM ©   (2003-08-26 20:25) [3]

Никак. Именно ярлык и именно на форме никак.
А вот разместить на форме ListView и добавить в него итем со значком, и сделать так, чтобы при щелчке по нему что-то запускалось - это можно. Можно даже перетаскивание сделать. Но про это не спрашивали.

> default © (24.08.03 22:04) [2]

это не на форме это на диске:)))

---

← →
Snap ©   (2003-08-26 20:27) [4]

Это имелось ввиду на HTML форме ;)

---

← →
KosilkA ©   (2003-08-27 11:38) [5]

> Snap © (26.08.03 20:27) [4]
> Это имелось ввиду на HTML форме ;)

да поможет нам тэг <script language="Delphi 6.0">

---

← →
ShadoWFM ©   (2003-08-27 21:25) [6]

DVM ......... nu tak ti napishi pogaluista

---

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

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



Память: 0.46 MB
Время: 0.014 c