Thema: Delphi DateUtils --> IncDay

Einzelnen Beitrag anzeigen

Benutzerbild von markus5766h
markus5766h

Registriert seit: 5. Mär 2009
Ort: Hamburg
569 Beiträge
 
Delphi XE8 Professional
 
#1

DateUtils --> IncDay

  Alt 14. Dez 2013, 18:34
Delphi-Version: 7
Hallo,

ich bin grad am verzweifeln !

folgendes Scenario :
Ich möchte mittels einer Schleife zwischen zwei Datumswerten eine bestimmte
Mondkonstellation abfragen.

Hab's erst mit Trunc(Date) versucht - geht zwar, allerdings komm' ich dann ja nicht mehr an die Datumswerte
(oder gibt es eine Funktion IntToDate ?
Also umgestiegen auf:
Delphi-Quellcode:
uses DateUtils;

. . .
var
  Date, DateDest : TDate
begin

  while Date < DateDest do
    begin
      . . .
      IncDay(Date, 1);
    end;
end;
leider bleibt Delphi von der Funktion IncDay(TDate, n) völlig unbeeindruckt !!!

Es muss doch möglich sein, obige Funktion "einfach" zu erstellen, ohne das ganze "zu Fuß"
umzusetzen - oder doch nicht ? . . . das wäre ja, wie in der Steinzeit !!!

weiß jemand Rat ?
Markus H.
  Mit Zitat antworten Zitat