Thema: Delphi FindFirst / FindLast

Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#5

AW: FindFirst / FindLast

  Alt 10. Sep 2010, 12:45
Vorher jeweils eine Variable für das jüngste und älteste Datum anlegen und mit einem Datum in der fernen Zukunft (für das Neuste), bzw. aus der Vergangenheit (für das Älteste) initialisieren.
Das ist gar nicht notwendig das man Fantasiedaten nimmt. Man kann die Werte für älteste und neueste Datei einfach von der ersten gefundenen nehmen. Pseudocode:
Delphi-Quellcode:
if FindFirst(...) then
begin
  oldestdate := SearchRec....;
  newestdate := SearchRec....;
  repeat
    [...]
  until FindNext(....);
  FindClose(...);
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat