Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.14;
Скачать: 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 вся ветка

Текущий архив: 2005.06.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.054 c
4-1113980046
dimasih
2005-04-20 10:54
2005.06.14
Знатокам TService in a Delphi 5.0


14-1116960689
Eraser
2005-05-24 22:51
2005.06.14
Уроки информатики в вашей школе


1-1117147052
iskatel
2005-05-27 02:37
2005.06.14
рекурсия... без рекурсии


1-1117120799
CRACKISH
2005-05-26 19:19
2005.06.14
БЛокирование программы!


14-1116938796
Игорь Шевченко
2005-05-24 16:46
2005.06.14
А разве Узбекистан стал подконтрольной НАТО территорией ?