Delphi Datum als Integer und zurück

Thema durchsuchen

Ansicht

Themen-Optionen

Datum als Integer und zurück

Ein Thema von franktron · begonnen am 14. Nov 2018 · letzter Beitrag vom 15. Nov 2018

Vorheriger Beitrag

Nächster Beitrag

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge

Delphi 10.2 Tokyo Enterprise

Datum als Integer und zurück

14. Nov 2018, 10:09

Ich habe einen Alten Code (Delphi 2010 32 Bit)

cbTargetDate.Date := Trunc(TheOperation^.Process^.TargetDate); cbTargetDate.Date is TDateTime
TargetDate ist Integer

Jetzt habe ich einen Neuen Code in XE10.2 gemacht und da kommt nur noch müll raus Datum > Jahr 4000
Start:=Trunc(Operationen.Items[i].StartDate);
Selbe Konstellation wie in Delphi 2010

Was ist da der unterschied

P.S. die Daten (Datum als Integer kommen von eine MS SQL Server)

Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;