Forum: Object-Pascal / Delphi-Language
Delphi
by hboy,
1. Feb 2004
var
SearchRec: TSearchRec;
Sortlist: TListbox;
i: integer;
begin
SortList := TListbox.create(self);
FindFirst(bmpfolder+'*.bmp', faAnyFile, SearchRec);
repeat
Sortlist.items.add(searchrec.Name);
until FindNext(searchrec) <> 0;
Forum: Object-Pascal / Delphi-Language
Delphi
by hboy,
1. Feb 2004
am einfachsten geht es wenn du die Dateinamen in eine Listbox reinlädst und sorted:= true setzt. Dann kannst du die Namen wieder rauslesen, diesmal sortiert
Forum: Object-Pascal / Delphi-Language
Delphi
by hboy,
1. Feb 2004
Das ist nunmal so im Dateisystem sind die Dateien nicht fertig sortiert. Das muss dein Programm erledigen.