UnixToDateTime

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von user0815 · begonnen am 26. Mär 2015 · letzter Beitrag vom 26. Mär 2015

Vorheriger Beitrag

Nächster Beitrag

user0815

Registriert seit: 5. Okt 2007
331 Beiträge

Delphi XE2 Professional

AW: UnixToDateTime

26. Mär 2015, 10:18

zusammenfalten · markieren

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...