Thema
:
Delphi
Verz. nach Datei durchsuchen die gestern gemacht wurden
Einzelnen Beitrag anzeigen
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
15. Dez 2005, 11: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???
zusammenfalten
·
markieren
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
;
Zitat
tomsel
Öffentliches Profil ansehen
Mehr Beiträge von tomsel finden