@MrSpock: Kann ich leider nicht brauchen, da es später
nonVCL werden soll.
@Mathias: Hilft leider aich nicht.
Aber ich habe was gefunden.
Delphi-Quellcode:
st.wYear := 1970;
st.wMonth := 1;
st.wDayOfWeek := 0;
st.wDay := 1;
st.wHour := 0;
st.wMinute := 0;
st.wSecond := 0;
st.wMilliseconds := 0;
SystemTimeToFileTime(st,ft);
RaiseLastOsError;
RaisLastOSError liefert: "Aufruf einer Systemfunktion fehlgeschlagen." Und das stimmt auch mit meiner Beobachtung über ein. Als Datum bekomme ich nämlich immer das, was ich in die Struktur eintrage.