Delphi-Quellcode:
function DateTimeToUnix(const AValue: TDateTime; AInputIsUTC: Boolean): Int64;
var
LDate: TDateTime;
begin
if AInputIsUTC then
LDate := AValue
else
LDate := TTimeZone.Local.ToUniversalTime(AValue); // <<----
Result := SecondsBetween(UnixDateDelta, LDate);
if LDate < UnixDateDelta then
Result := -Result;
end;
mit dem Parameter "AInputIsUTC" gibts Du an, ob der übergebene Zeitwert schon auf UTC "normiert" wurde.
Bei false wird er dann im else Zweig auf UTC "normiert"
Ach so ok.
Hab dann wohl was falsch verstanden. Danke
Aber leider tun es die bisherigen Funktionen nicht. Schade
Naja wenn es nicht klappt dann lass ich es mit den EPG Kram einfach und gut ist.
Frage mich nur wie man das früher gemacht hat wenn die Leute eine Stunde zurück setzen mussten.
Ging doch auch ohne 10.4 (in D6 oder was auch immer)
EDIT:
Nun gut Fakt ist jedoch das genau AInputIsUTC den unterschied ausmacht ob ich nun eine stunde mehr oder weniger übergebe.
Bei false ist die Zeit meine Locale bei true liegt sie 1 Stunde zurück.