Ordner filtern in ShellTreeView

[schmidtze]

Hallo,

ich benutze TsShellTreeView der AlphaControls. Darin möchte ich nun nur bestimmte Ordner anzeigen. Dafür gibt's auch ein Event, in welchem ich über einen Var-Parameter (CanAdd) sagen kann, ob dieser Ordner erscheinen soll, oder nicht. Dort habe ich ein Folder-Objekt welches u.a. auch ein Property AbsoluteId (PItemIDList) besitzt. Was ich nun nur anzeigen möchte, auf höherer Ebene, ist der Desktop-Folder als Root, darunter "Dieser PC" und "Netzwerk". Darunter dann auch wieder nur ausgewählte Ordner, unter "Dieser PC" die Laufwerke und "Dokumente" und "Bilder".

Kann mir jemand einen Tipp geben, wie ich nun ausfiltere, "Systemsteuerung", "Papierkorb", "Bibliotheken" usw., das will ich alles nicht anzeigen.

Herzlichen Dank im Voraus und viele Grüße
Friedemann

[schmidtze]

Hallo,

ach, vielleicht habe ich das zu umständlich beschrieben. Ich habe ein Objekt, an welchem auch ein PItemIDList-Property und ein IShellFolder-Property existieren. Nun möchte ich anhand dieser Properties herausfinden, ob es nun z.B. ein Folder vom Typ CSIDL_NETWORK (Netzwerk), CSIDL_CONTROLS (Systemsteuerung) oder CSIDL_DRIVES (Dieser PC) ist. Das scheint mir irgendwie nicht so ganz einfach. Müsste doch aber gehen...

Viele Grüße
Friedemann

[tomkupitz]

Meinst du so...

Code:

function SamePIDL(SF: IShellFolder; ID1, ID2: PItemIDList): Boolean; //SF=Desktop oder Computer
begin
  result:=SF.CompareIDs(0, ID1, ID2)=0;
end;

Beste Grüße

[schmidtze]

Jaaaaa, das geht, super!!!!! Ganz ganz herzlichen Dank!!!

Grüße
Friedemann