OK, ich hab jetzt weitere Infos. Es scheint sich um das von Webkit verwendet Datumsformat zu handeln:
Zitat:
WEBKIT time which is the number of microseconds since midnight UTC of 1 January 1601
Wie könnte ich das nun am besten umrechnen?
EDIT: Ich hab mir jetzt mal die UnixToDateTime-Routinen angesehen und ein bisschen gebastelt:
Delphi-Quellcode:
const
WebKitTimeDelta = 256036; //Tage zwischen 31.12.1899 und 01.01.1601 (glaube der Wert ist falsch)
...
...
function DateTimeToWebKitTime(const AValue: TDateTime):Int64;
begin
Result := Round((AValue - WebKitTimeDelta) * MSecsPerDay);
end;
function WebKitTimeToDateTime(const AValue: Int64):TDateTime;
begin
Result := AValue / MSecsPerDay + WebKitTimeDelta;
end;
Funktioniert leider nicht:
DateTimePicker3.DateTime := WebKitTimeToDateTime(StrToInt64(Edit2.Text));
Wert von Edit2: 12884278663641352
Debugger zeigt als Ergebnis von WebKitTimeToDateTime: 149379631,64
DateTimePicker3 verändert sich aber nicht