Page tree
Skip to end of metadata
Go to start of metadata

Erläuterung

Konvertierung eines UNIX TimeStamps nach Delphi und zurück.

Skript

function UNIXTimeToDateTime(UnixTime : LongWord): TDateTime;
begin
  Result := (UnixTime / 86400) + 25569;
end;
function DateTimeToUNIXTime(DelphiTime : TDateTime): LongWord;
begin
  Result := Round((DelphiTime - 25569) * 86400);
end;

  • No labels