Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi Negative TDateTime-Werte (https://www.delphipraxis.net/201624-negative-tdatetime-werte.html)

hoika 8. Aug 2019 14:06

AW: Negative TDateTime-Werte
 
Hallo,
Zitat:

Ein INVALID_DATE = 0 hat sich als fehleranfällig herausgestellt, weil ein nicht initialisierter TDateTime auch = 0 ist.
In der Datenbank muss man unterscheiden zwischen 0.0 (AsDateTime) oder einem wirklichen NULL (IsNull).

In deinem Delphi-Code hast du doch freie Hand.
Ob das 0.0 oder -100.0 ist, spielt doch keine Rolle, das ist deine eigene Definition.

"Nicht initialisiert" (e) Variable ist aber was ganz anderes.
Das ist (d)ein Programmfehler.

Wir haben in einem unserer ooooold legacy Programm übrigends 2.0 als Grenze benutzt.
<=2.0 = 0.
Das ganze als Funktion und gut (oder schlecht) ist .

Uwe Raabe 8. Aug 2019 14:39

AW: Negative TDateTime-Werte
 
Ein
Delphi-Quellcode:
TDateTime
ist als gültig definiert zwischen dem 01.01.0001 und dem 31.12.9999. Alles andere kann als NULL-DateTime verwendet werden.

Den Tag vor dem 01.01.0001 bekommt man übrigens mit
Delphi-Quellcode:
-DateDelta
erreichen. Ein solches Datum wird dann von
Delphi-Quellcode:
DateTimeToStr
als 00.00.0000 dargestellt.

Rollo62 8. Aug 2019 15:57

AW: Negative TDateTime-Werte
 
Zitat:

Zitat von freimatz (Beitrag 1440180)
Wie wäre es mit NaN?

Was bedeuetet bei dir invalid? Ist ein nicht initialisierter TDateTime nicht auch invalid? Wo ist der Unterschied?

Generell, nicht nur für DateTime:
Ich bin mittlerweile auch ein Freund von NaN geworden, und baue meine Rountinen nach und nach
auf "NaN" und "Infinity" Sicherheit aus.
Diese Konstanten sind ja per System vorgegeben, und sollten eindeutig sein.

Ansonsten ist aber auch Spring4D eine überzeugenden Lösung.

Codehunter 8. Aug 2019 16:42

AW: Negative TDateTime-Werte
 
NaN scheidet aus, denn der ist auch nur wieder 0.0 und damit bei TDateTime = 30. Dezember 1899 12:00 Uhr. Und JA, nicht initialisiert und INVALID sind in meinem Fall zweierlei. Das ist aber sehr fallspezifisch.

Zitat:

Zitat von Uwe Raabe (Beitrag 1440246)
Ein
Delphi-Quellcode:
TDateTime
ist als gültig definiert zwischen dem 01.01.0001 und dem 31.12.9999. Alles andere kann als NULL-DateTime verwendet werden.

Den Tag vor dem 01.01.0001 bekommt man übrigens mit
Delphi-Quellcode:
-DateDelta
erreichen. Ein solches Datum wird dann von
Delphi-Quellcode:
DateTimeToStr
als 00.00.0000 dargestellt.

Das ist interessant. Wusste ich auch noch nicht. Ebenso wie die Hilfe, die kennt "DateDelta" auch nicht. Dann wäre ein wirklich INVALIDer Wert
Delphi-Quellcode:
INVALID_DATE = -DateDelta - 1
?

Rollo62 8. Aug 2019 17:11

AW: Negative TDateTime-Werte
 
NaN ist SOWAS WIE 0.0, aber nicht gleich 0.0.
Delphi-Quellcode:
Nan is equivalent to 0.0/0.0

Uwe Raabe 8. Aug 2019 17:54

AW: Negative TDateTime-Werte
 
Zitat:

Zitat von Codehunter (Beitrag 1440265)
Dann wäre ein wirklich INVALIDer Wert
Delphi-Quellcode:
INVALID_DATE = -DateDelta - 1
?

Stimmt zwar, aber
Delphi-Quellcode:
-DateDelta
ist ebenso invalide und etwas einfacher zu schreiben. Dazu kommt noch, daß dieser Wert in Single, Double und Extended exakt darstellbar ist.

samso 9. Aug 2019 08:56

AW: Negative TDateTime-Werte
 
Zitat:

Zitat von Uwe Raabe (Beitrag 1440283)
Zitat:

Zitat von Codehunter (Beitrag 1440265)
Dann wäre ein wirklich INVALIDer Wert
Delphi-Quellcode:
INVALID_DATE = -DateDelta - 1
?

Stimmt zwar, aber
Delphi-Quellcode:
-DateDelta
ist ebenso invalide und etwas einfacher zu schreiben. Dazu kommt noch, daß dieser Wert in Single, Double und Extended exakt darstellbar ist.

...und das -DateDelta auch sehr schön mit TTimestamp harmoniert (TTimestamp.Date=0)


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:48 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz