[Gelöst]Inhalt von Arbeitsplatz parsen und ausgeben

[sieppl]

@Matthias: Danke! Damit sollte ich auf jeden Fall etwas anfangen können. Zumindest werde ich den Bug in meinem Code finden..

EDIT:

FALSCH:

Delphi-Quellcode:

begin 
  FillChar(StrRet, SizeOf(StrRet), 0); 
  PDesktop.GetDisplayNameOf(PIDL, SHGDN_NORMAL, StrRet); 
  Memo1.Lines.Add(StrRetToString(PIDL, StrRet)); 
end;

RICHTIG:

Delphi-Quellcode:

begin 
  FillChar(StrRet, SizeOf(StrRet), 0); 
  PSubFolder.GetDisplayNameOf(PIDL, SHGDN_NORMAL, StrRet); 
  Memo1.Lines.Add(StrRetToString(PIDL, StrRet)); 
end;

Danke!