Autor Beitrag
Andreas_Sans
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 76



BeitragVerfasst: Mo 30.05.05 16:15 
Hallo,

ich möchte Dateinamen aus einem Ordner in eine CheckListbox speichern. dazu verwende ich folgenden Code :

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
  FindFirst(datei+'*.*', faAnyFile, SearchRec);
  FindNext(SearchRec);
   while( FindNext(SearchRec)=0) do begin
          DateienListe.Items.Add(SearchRec.Name);
          DateienListe.Checked[i] := true;
          i:=i+1;
   end;

datei ist der Pfad des Ordners
DateienListe ist dabei die CheckListbox.

das klappt auch wunderbar, aber es werden auch alle utnerordner ausgegeben, wie kann ich herausfinden, ob das gefundene eine Datei oder ein Ordner ist ?

ich wäre für hilfreiche antworten und tips dankbar

mfg Andreas
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 30.05.05 16:46 
ausblenden Delphi-Quelltext
1:
if SearchRec.Attr and faDirectory = faDirectory then					
Andreas_Sans Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 76



BeitragVerfasst: Mo 30.05.05 16:54 
danke, es klappt jetzt so wie es soll