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

Lnk-ярлык определение его параметров   Найти похожие ветки 

← →
Malik ©   (2008-03-14 23:04) [0]

Я пытаюсь определить адресс файла на который ссылает этот ярлык таким образом:
Var
 shelllink: ishelllink;
 persistfile: ipersistfile;
 anobj: iunknown;
 p:PChar;
 s:String;
 finddata: twin32finddata;
....
anobj := createcomobject(clsid_shelllink);
shelllink := anobj as ishelllink;
persistfile := anobj as ipersistfile;
persistfile.load(pwchar(adr), 0);//Adr здесь WideString
GetMem(P, 100);
shelllink.getpath(P,  sizeof(P),finddata,  slgp_uncpriority);
s:=P;
....
Почему-то во время дебагинига когда я просматриваю значение S имеет значение "C:\" скажем вместо "C:\asa\asas.exe"
. Чую, что туплю, но не знаю где((( Может подскажите как правильно?

---

← →
Johnmen ©   (2008-03-14 23:27) [1]

Потому, что sizeof(P)=4

---

← →
Malik ©   (2008-03-14 23:37) [2]

Спасибо большое за помощь с вашей подачи разобрался разобрался.

---

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

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



Память: 0.45 MB
Время: 0.015 c