Vielleicht so in der Art:
Überprüfen, ob das 3 letzte Zeichen ein Punkt ist (KeineAhnung
.bmp), falls ja in die Listbox kopieren
Delphi-Quellcode:
var KA:TStrings;
i:integer;
begin
KA:=TStringList.Create;
idFTP1.List(KA);
for i:=0 to KA.Count do
if KA[i][Length(KA[i])-2]='.'then
Listbox1.Items.Add(KA[i]);
(Nur grade schnell "hingeschmiert", also voller Fehler
)