Browseforfolder und Delphi 2007

[gargano]

So, jetzt hab ichs:


Wenn pidlRoot = nil ist, dann geht das ganze nicht.

Mit

Delphi-Quellcode:

  
if (not SUCCEEDED(SHGetSpecialFolderLocation(GetActiveWindow, CSIDL_DRIVES,
    pidlPrograms))) then exit;

und
pidlRoot:=pidlPrograms; Funktioniert es.

Gruß und schöne Ostern

Gargano