Hallo Sleepy,
das machst Du im Event
OnAddFolder. Der wird aufgerufen, bevor eine Datei oder ein Verzeichnis zur ListView hinzugefügt wird.
[Edit]
Hier ein kleines Beispiel:
Delphi-Quellcode:
uses masks;
procedure TForm1.ShellListView1AddFolder(Sender: TObject;
AFolder: TShellFolder; var CanAdd: Boolean);
begin
if not AFolder.IsFolder then
CanAdd := MatchesMask(AFolder.Pathname, '*.exe');
end;
[/Edit]