Konvertierung eines UNIX TimeStamps nach Delphi und zurück.
function UNIXTimeToDateTime(UnixTime : LongWord): TDateTime; begin Result := (UnixTime / 86400) + 25569; end;
function DateTimeToUNIXTime(DelphiTime : TDateTime): LongWord; begin Result := Round((DelphiTime - 25569) * 86400); end;