Filter für ShellListView bzw. ShellTreeView

FriFra · Verfasst: Mi 23.10.02 22:17

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 · Verfasst: Do 24.10.02 01:31

Ich hab selber eine Lösung gefunden:

markieren

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 · Verfasst: Do 24.10.02 10:10

Hallo,

nur wenige Postings unter deiner Frage hättest du auch das hier finden können.

Aber du bist ja auch auf eine Lösung gekommen :mrgreen:

Gruß
Klabautermann

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme