Registriert seit: 5. Okt 2007
331 Beiträge
Delphi XE2 Professional
|
AW: UnixToDateTime
26. Mär 2015, 11:18
Delphi-Quellcode:
const
UnixTime = 1427359860;
var
dt : TDateTime;
begin
dt := EncodeDateTime(1970, 1, 1, 0, 0, 0, 0);
dt := IncSecond(dt, UnixTime);
Memo1.Lines.Append(DateTimeToStr(dt)); // 26.03.2015 08:51:00 ???
// @Der schöne Günther, passt
dt := TTimeZone.Local.ToLocalTime(DateUtils.UnixToDateTime(UnixTime));
Memo1.Lines.Append(DateTimeToStr(dt)); // 26.03.2015 09:51:00 = ok
alles komisch...
|
|
Zitat
|