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

Ярлык на Рабочий Стол   Найти похожие ветки 

← →
Dean   (2005-05-25 17:59) [0]

Привет, мастера!
Подскажите, плз, как создать ярлык на рабочем столе винды? Помню где-то было... но найти никак не могу :((

---

← →
Eraser ©   (2005-05-25 18:01) [1]

Dean   (25.05.05 17:59)

IShellLink если не ошибаюсь.

---

← →
Kolan ©   (2005-05-25 18:02) [2]

Как программно создать ярлык?
Previous  Top  Next  

Автор: 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;

Взято с Исходников.ru http://www.sources.ru

---

← →
Dean   (2005-05-25 18:04) [3]

точно!!! спасибо...

---

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

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



Память: 0.45 MB
Время: -0.953 c