AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language TDate: Vergleich = 0 funktioniert nicht immer - warum?
Thema durchsuchen
Ansicht
Themen-Optionen

TDate: Vergleich = 0 funktioniert nicht immer - warum?

Ein Thema von rdeutsch · begonnen am 16. Mai 2024 · letzter Beitrag vom 17. Mai 2024
 
rdeutsch

Registriert seit: 24. Mär 2006
79 Beiträge
 
Delphi 12 Athens
 
#1

TDate: Vergleich = 0 funktioniert nicht immer - warum?

  Alt 16. Mai 2024, 16:18
Delphi-Version: 5
Hallo zusammen

Heute bin ich über ein Problem gestossen, auf dass ich mir im Moment keinen Reim machen kann.
Im Programmcode gibt es Datumvergleiche ähnlich diesem hier:

Code:
var aDate: TDate;
begin
  if aDate > 0 then
    ShowMessage('Datum > 30.12.1899');
end;
Hinweis: der Inhalt von aDate wird im Debugger mit 30.12.1899 ausgewiesen, also = 0.

Mein Problem ist nun, dass im Programmcode, welchen wir bis vor ein paar Monaten verwendet haben, die Variable auch als 0 gewertet wird und somit die Meldung nicht angezeigt wird.
Nehme ich nun den etwas aktuelleren Programmcode, dann wird die Meldung angezeigt. D.h. die Variable aDate - obwohl im Debugger immer noch mit 30.12.1899 - ist plötzlich nicht mehr 0.

In beiden Tests verwende ich jeweils die gleiche Delphiumgebung 12.1.

Gibt es irgendein Compilerschalter oder eine Einstellung im Projekt oder etwas anderes, dessen Auswirkung den oben beschriebenen Effekt hat?
Projekteinstellungen habe ich verglichen und konnte keinen Unterschied feststellen.
Im Moment bin ich wirklich ratlos und bin um jeden Tipp dankbar.

Gruss, Robert
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:49 Uhr.
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-2025 by Thomas Breitkreuz