Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.30;
Скачать: CL | DM;

Вниз

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

 
Intell ©   (2003-04-20 20:25) [0]

Как создать ярлык для своего приложения, примерно также как в WinRAR - щёлкнул, появился ярлык в пуске и на десткопе. Желательно примерчик попроще, в моей проге каждая строка на счету.

P.S.
Не говорите - "Посмотри в FAQ"


 
Романов Р.В. ©   (2003-04-20 21:52) [1]

Посмотри в Faq

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621840&n=15


 
Intell ©   (2003-04-21 12:33) [2]

>Посмотри в Faq
Спасибо, пошастаю. Особенно на http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621840&n=15

Спасибо, буду разбирать пример. Можно спросить - а чуть полегче пример есть? Этот работает, но великоват.


 
Lighnam   (2003-04-21 12:36) [3]

это этот великоват ?

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;


ха - ха - ха ! да ты наверное просто не понял его :)


 
ZmeiGorin ©   (2003-04-21 14:42) [4]

Если пример великоват/непонятет/лень тебе на www.torry.net


 
Intell ©   (2003-04-21 16:48) [5]

Lighnam, где-то я видел это пример... А...? Кажись Романов Р.В. подсказал его. Тебе было не лень залезть на его ссылку, копировать текст сюда... И зря ты говоришь, что я его не понял. Всё отлично, но строчек многовато. Был бы на строчки 4-5 меньше, вообще было бы великолепно.



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

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

Наверх




Память: 0.48 MB
Время: 0.018 c
6-97772
Zhenya
2003-04-24 20:55
2003.06.30
ClientSocket???


11-97578
Alexander
2002-10-16 13:35
2003.06.30
Как можно написать что-то подобное Sleep(msek) с обработкой всех


14-97872
Inkognito_Man
2003-06-13 14:12
2003.06.30
AcrobatReder


1-97589
Bagroff
2003-06-18 19:19
2003.06.30
Дин. двумерный массив.


3-97515
AkaSaint
2003-06-02 00:28
2003.06.30
Странное с ClientDataSet