Cardinal in TDateTime

[marabu]

Besser so:

Delphi-Quellcode:

function SekundenToDateTime (sec: Int64): TDateTime;
begin
  Result := 2.0 + sec / (60 * 60 * 24);
end;

Delphi verwendet den 30.12.1899 als Referenzdatum, nicht den 1.1.1900.

Gute Nacht

marabu