Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
AW: Ordinaler Typ
13. Feb 2014, 11:43
Du musst ja nicht zwingend eine For-Schleife verwenden.
Delphi-Quellcode:
Z := JahrtageBegin;
while Z < JahrTageEnde do
begin
...
Z := DateUtils.IncDay(Z);
end;
Etwa so zumindest müsste es auch funktionieren, ggf. musst Du noch Rundungsungenauigkeiten berücksichtigen.
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|