Einzelnen Beitrag anzeigen

venice2
(Gast)

n/a Beiträge
 
#5

AW: DateTimeToUnix 1 stunde zurück

  Alt 18. Dez 2020, 07:23
Delphi-Quellcode:
function DateTimeToUnix(const AValue: TDateTime): Int64;
begin
  aValue := TTimeZone.Local.ToUniversalTime(AValue);
  Result := Round((AValue - UnixDateDelta) * SecsPerDay);
end;
oder beim Aufruf

TimeStart := DateTimeToUnix(IncHour( TTimeZone.Local.ToUniversalTime(Now), 0)); Grüße
Klaus
aValue Der Linken Seite kann nichts zugewiesen werden.
wo ist TTimeZone definiert welche unit? In DateUtils jedenfalls nicht.
Danke.

Geändert von venice2 (18. Dez 2020 um 07:26 Uhr)
  Mit Zitat antworten Zitat