Hi,
Ordner könntest du ja dann manuell öffnen
Delphi-Quellcode:
procedure TForm1.ShellListView1Click(Sender: TObject);
if ShellListView1.SelectedFolder.IsFolder then
ShellListView1.Path := ShellListView1.SelectedFolder.PathName;
end;
(nicht getestet)