« Anti virus windows live one care Gagal (Total) | HomePage | Download Free Debian Ebook ( made in Indonesia ) »
09/24/2007
Unix Timestamp Converter
He..he.. ternyata ga susah buat unix timestamp converter:
const // Sets UnixStartDate to TDateTime of 01/01/1970
UnixStartDate: TDateTime = 25569.0;
function DateTimeToUnix(ConvDate: TDateTime): Longint;
begin
Result := Round((ConvDate - UnixStartDate) * 86400);
end;
function UnixToDateTime(USec: Longint): TDateTime;
begin
Result := (Usec / 86400) + UnixStartDate;
end;
16:10 Posted in Komputer | Permalink | Comments (0) | Email this