Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Filter für ShellListView bzw. ShellTreeView
FriFra - Mi 23.10.02 22:17
Titel: Filter für ShellListView bzw. ShellTreeView
Gibt es eine Möglichkeit neben der Einschränkung auf Ordner/Files auch zu filtern, so dass z.B. nur noch Ordner und *.exe files angezeigt werden?
FriFra - Do 24.10.02 01:31
:lol: Ich hab selber eine Lösung gefunden:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| procedure THauptfenster.FileListBox1AddFolder(Sender: TObject;
AFolder: TShellFolder; var CanAdd: Boolean);
begin
if (CompareText(ExtractFileExt(AFolder.PathName), '.exe') = 0) or
AFolder.IsFolder then
CanAdd := True
else
CanAdd := False;
end; |
Klabautermann - Do 24.10.02 10:10
Hallo,
nur wenige Postings unter deiner Frage hättest du auch
das hier [
http://www.auq.de/viewtopic.php?t=3348] finden können.
Aber du bist ja auch auf eine Lösung gekommen :mrgreen:
Gruß
Klabautermann
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!