Einzelnen Beitrag anzeigen

Benutzerbild von tomsel
tomsel

Registriert seit: 8. Dez 2005
Ort: am Chiemsee
304 Beiträge
 
Delphi 7 Professional
 
#4

Re: Verz. nach Datei durchsuchen die gestern gemacht wurden

  Alt 15. Dez 2005, 10:21
Zitat:
oh man das hab ich befürchtet ok nagut dan schmeiß ich das alles in nen array und lese es dan aus
aber einen count gibt es nicht oder ?
damit ich die array länge nihct so unendlihc groß machen muss
wofür ein Array???

Delphi-Quellcode:
procedure Dateisuche;
var SearchRec:tSearchRec;
    dtGestern:tDate;
    sDateiPfad:string;
begin
        ...
   if FindFirst(sDateipfad + '\*.*', faAnyFile, SearchRec) = 0 then
       repeat
          if ((Searchrec.Attr and faDirectory) = 0)
          and(FileDateToDateTime(SearchRec.Time) = dtGestern) then begin
            ...
          end;
        until FindNext(SearchRec) <> 0;
        FindClose;

end;
  Mit Zitat antworten Zitat