Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.490 Beiträge
 
Delphi 7 Professional
 
#5

AW: Bis = 24:00:00

  Alt 12. Apr 2023, 10:58
24:00:00 Uhr heute = 00:00:00 Uhr morgen
Delphi-Quellcode:
var
  dtZuVerarbeitendeZeitangabe : TDateTime;
  dtHeute : TDateTime;
  dtMorgen : TDateTime;
begin
  // Irgendwoher komme eine Zeitangabe:
  dtZuVerarbeitendeZeitangabe := '23:59:59.999'; // nur symbolische Zuweisung
  dtHeute := Trunc(dtZuVerarbeitendeZeitangabe);
  dtMorgen := dtHeute + 1;
  if dtZuVerarbeitendeZeitangabe < dtMorgen then begin
    // Hier sind wir auf jeden Fall noch vor 24:00:00, also Heute
  end;
end;
  Mit Zitat antworten Zitat