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

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

← →
Ivolg   (2004-10-28 11:04) [0]

Здраствуете!! Помогите создать ярлык с помошью делфи!! Спасибо!!

---

← →
begin...end ©   (2004-10-28 11:07) [1]

С помощью CreateComObject, CLSID_ShellLink.

Подробнее - кто ищет, тот всегда найдёт. :-)

---

← →
Ivolg   (2004-10-28 11:36) [2]

Вот нашёл, тока чёт непашет:
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;

тока незнаю как эту процедуру успользовать??

---

← →
begin...end ©   (2004-10-28 11:55) [3]

> [2] Ivolg   (28.10.04 11:36)


> Вот нашёл, тока чёт непашет:


> тока незнаю как эту процедуру успользовать

А как же ты можешь делать вывод о том, пашет она или не пашет, если ты даже не знаешь, как её использовать?

У меня - пашет:

CreateLink("C:\1.txt", "C:\1.lnk", "", "")

---

← →
Ivolg   (2004-10-28 13:08) [4]

Пасибо!! Но это не то, что мне хотелось! Вот задача: Открыть файл у  Counter Strik"a hl.exe и в ярлык (его свойства) прописать к пути такую вешь -console game strike, а потом создать ярлык! Случайно не знаешь как это мона сделать

---

← →
Ivolg   (2004-10-28 13:10) [5]

О!! уже понял как сделать!!! :))))

---

← →
begin...end ©   (2004-10-28 13:12) [6]

> [4] Ivolg   (28.10.04 13:08)

Случайно не догадываешься, для чего нужен параметр Param ?

---

← →
Ivolg   (2004-10-28 13:18) [7]

НЕА!!

---

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

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



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