"Arbeitsplatz" als FileName in TOpenDialog

[himitsu]

erstmal das

Delphi-Quellcode:

try
  if SHGetPathFromIDListW(ItemIDList, hPath) then
    Result:=hPath
  else
    RaiseLastWin32Error;
finally

und schon wüßtest du, wo es hängt
(PS: vorher konnte Result nicht initialisiert sein)

dann noch das
CSIDL_DRIVES
und du wirst es nicht glauben, aber da findet man sogar was
http://www.tutorials.de/forum/c-c/20...dl_drives.html