Sekunden seit 1. Januar 0:00 1970

[Luckie]

Danke für den Hinweis. Da gibt es nur ein Probleme, wie ich schon zu Spitzohr gesagt habe, es muß ohne SysUtils gehen.

Der Hinweis von Christian auf die Stelle im PSDK hab eich gefunden, nur leider kennt Delphi kein Int32x32To64.

Zitat:

The time functions included in the C run-time use the time_t type to represent the number of seconds elapsed since midnight, January 1, 1970. The following example converts a time_t value to a file time, using the Int32x32To64 function.

Code:

void TimetToFileTime( time_t t, LPFILETIME pft )
{
    LONGLONG ll = Int32x32To64(t, 10000000) + 116444736000000000;
    pft->dwLowDateTime = (DWORD) ll;
    pft->dwHighDateTime = ll >>32;
}