Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

Datum als Integer und zurück

  Alt 14. Nov 2018, 11: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;
  Mit Zitat antworten Zitat