Timestamp to valid Delphi's datetime

[WojTec]

I want to know datatime of PE compilation. So, I learned a bit about PE and finally got TimeDateStamp field in PE header. Unfortunately this is cardinal value and it's useless in Delphi. So, I performed conversion:

Delphi-Quellcode:

FormatDateTime('c', EncodeDate(1970, 1, 1) + h.TimeDateStamp / 86400)

Code:

TimeDateStamp = 1379407669
DateTime = 17.09.13 08:47:49

Result is 2hrs back. Question: I did wrong conversion or need to add 2hrs in any case?

[mkinzler]

You have to adapt to your timezone. Timestamp is GMT

[WojTec]

Hm, I don't know how, because timestamp is -2, but my GMT is +1.

I have:

Delphi-Quellcode:

(EncodeDate(1970, 1, 1) + 1379407669 {timestamp} / 86400) + ((1 / 24) {hour} + (TimeZone.Bias / 60);

[DeddyH]

Try DateUtils.TTimeZone.Local.ToLocalTime(your DateTime-value).

[WojTec]

This is for DXE2+, I guess? I have D2010 and such goodies are absent. How to in 'old classic' style?

[Uwe Raabe]

Zitat:

Zitat von WojTec (Beitrag 1228776)

Hm, I don't know how, because timestamp is -2, but my GMT is +1.

What about Daylight Saving Time?

[WojTec]

Zitat:

Zitat von Uwe Raabe (Beitrag 1228797)

What about Daylight Saving Time?

What you mean? TimeZone.Bias + TimeZone.DaylightBias? I don't know :(