Для создания ярлыка на рабочем столе использую всем известный код [Code]// Создание ярлыка // PathObj - Путь к программе // PathLink - Путь к ярлыку // Desc - Описание // Args - Аргументы HRESULT CreateLink(wchar_t *PathObj, wchar_t *PathLink, wchar_t *Desc, wchar_t *Args) { CoInitialize(NULL); IShellLinkW *psl; HRESULT hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, IID_IShellLinkW, (void**)&psl); //HRESULT hres = CoCreateInstance(CLSID_ShellLink ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=82417