DateTimeToUnix hat in neueren Versionen von Delphi 2 Parameter.
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;
AInputIsUTC: Boolean der 2 Parameter den gibt es nicht unter D2010.
Wie kann ich nun die Zeit übergeben das ich in unserer Zeitzone liege. bsp. 5 Uhr und nicht 4
In 10.4 schalte ich dazu den parameter AInputIsUTC auf false.
Wie ich schon sagte das geht so nicht unter D2010.
Das Problem ich liege mit allen Sendungen um 1 Stunde zurück und die EPG Daten stimmen dann nicht.
Ich muss die Unix zeit schicken da ansonsten mein send String einen Fehler zurück gibt.
Delphi-Quellcode:
function DateTimeToUnix(const AValue: TDateTime): Int64;
begin
Result := Round((AValue - UnixDateDelta) * SecsPerDay);
end;