Re: .LNK
От: oles  
Дата: 23.07.03 21:12
Оценка:
Здравствуйте, xZero, Вы писали:

Z>Как из этих файлов вытащить название файла, который они запускают?


IObject := CreateComObject(CLSID_ShellLink);
SLink := IObject as IShellLink;
SFile := IObject as IPersistFile;
StringToWideChar(strFile,f,MAX_PATH);
SFile.Load(f,STGM_READ);
SLink.Resolve(MainForm.Handle,SLR_ANY_MATCH);
SLink.GetPath(path,MAX_PATH,data,0);

WBR, oles
... << RSDN@Home 1.1 beta 1 >>
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.