Mehrere Dateien vom Explorer per Drag & Drop in Listbox?

[mirage228]

Zitat von Nicodius:

wohin damit?

An die Schleife:

Delphi-Quellcode:

      for i := 0 to List.Count-1 do 
        If (ExtractFileExt(AnsiLowerCase(List[i])) = '.ico') or 
           (ExtractFileExt(AnsiLowerCase(List[i])) = '.bmp') or 
           (ExtractFileExt(AnsiLowerCase(List[i])) = '.jpg') or 
           (ExtractFileExt(AnsiLowerCase(List[i])) = '.jpeg') then 
        Listbox1.Items.add(List[i]);

mfG
mirage228