ListView Dateiendungen Filtern

[Tommy1988]

Ich habe eine ListView, dort werden alle Dateien aus einem zuvor ausgewählten
Verzeichnis aufgelistete.

Ich habe versucht, diese zu filter, aber vergeblich:

[delphi
if FindFirst(VerzName+'*.txt',faAnyFile,SR)=0 then begin[/delphi]

So lautete es richtig, er listete alle (*:*) Dateien auf.

Mein Versuch:

Delphi-Quellcode:

 
    if FindFirst((VerzName+'*.txt') or
    (VerzName+'*.htm') or
    (VerzName+'*.html') or
    (VerzName+'*.php'),faAnyFile,SR)=0 then begin
//Dateien gefiltert ins ListView schreiben