Datum ohne Zeit vergleichen

[CalganX]

Hi,
ich möchte gerne zwei Daten (Plural von Datum ) vergleichen, allerdings ohne die Zeit (also den Nachkommastellen).

Wie stellt man das am dümmsten (Ironie ) an?

Chris

[alcaeus]

Hallo Chak,

sieh dir mal Trunc an. Das sollte fuer deine Zwecke gerade dumm genug sein.

Greetz
alcaeus

[CalganX]

Hi,
die Funktion nutze ich bereits, allerdings um die Zeit ohne Datum zu vergleichen.
Ist genau das Gegenteil von dem was ich erreichen will, denn trunc schneidet ja alles vor dem Komma ab.

Chris

[Hansa]

Delphi-Quellcode:

var D1,
    D2 : TDate;

begin
  D1 := Today;
  D2 := Today - 1;
  showmessage (BoolToStr (D1 > D2,true));
end;

Die Funktion ergibt in diesem Fall immer TRUE !

[CalganX]

Hi Hansa,
ich bin zwar schon etwas müde, aber irgendwie ist mir klar, dass dein Quelltext immer true liefern wird.
Es geht aber um folgendes: ich habe ein Datum. Und ich möchte nun wissen, ob dieses Datum ungleich heute ist. Sprich gestern oder älter. Das Problem bei einem einfachen <= ist einfach, dass ich einen DateTime-Wert habe und deswegen ich ebenfalls ein "gestern" bekomme, wenn dieses Datum nur eine Minute zurückliegt.
Deswegen will ich die Zeit abschneiden und nur das Datum betrachten.

Chris

[alcaeus]

Hallo Chris,

Zitat von Chakotay1308:

Ist genau das Gegenteil von dem was ich erreichen will, denn trunc schneidet ja alles vor dem Komma ab.

entweder ich hab was falsch verstanden oder du hast das
AFAIR schneidet Trunc alles nach dem Komma ab:

Code:

Trunc(34.567) = 34

Frac hingegen schneidet alles vor dem Komma ab:

Code:

Frac(34.567) = 0.567

Also benoetigst du Frac um Zeiten zu vergleichen, Trunc um Daten zu vergleichen.

Greetz
alcaeus

PS: Falls ich falsch liegen sollte, dann sagt es mir bitte, aber meine Erinnerung sagt mir das was ich grad geschrieben habe

[CalganX]

Hi,
och nö... Schon wieder einen Fehler gemacht.

Du hast natürlich vollkommen Recht, Andreas.

Danke für deine Hilfe,
Chris

[Steve]

Hi,

in der Unit DateUtils gibt's auch Routinen wie TimeOf, DateOf usw., die genau dafür da sind (ab D7 glaub ich)
(dahinter steckt freilich auch Trunc, Frac usw.)

Gruß
Stephan

[shmia]

Zitat von alcaeus:

AFAIR schneidet Trunc alles nach dem Komma ab:

Code:

Trunc(34.567) = 34

Genaugenommen müsste man die ziemlich unbekannte Funktion
function Int(X: Extended): Extended; benützen.
Denn so bleibt man im Bereich der Fliesskommazahlen und muss nicht in ein paar hundert Milliarden Jahren einen Integerüberlauf befürchten.

[jim_raynor]

Zitat von shmia:

Zitat von alcaeus:

AFAIR schneidet Trunc alles nach dem Komma ab:

Code:

Trunc(34.567) = 34

Genaugenommen müsste man die ziemlich unbekannte Funktion
function Int(X: Extended): Extended; benützen.
Denn so bleibt man im Bereich der Fliesskommazahlen und muss nicht in ein paar hundert Milliarden Jahren einen Integerüberlauf befürchten.

Ist aber auch gefährlich, da man Fließkommazahlen nicht unbedingt auf GLeichheit vergleichen kann. (Wegen der Ungenauigkeit)