Einzelnen Beitrag anzeigen

Willie1

Registriert seit: 28. Mai 2008
652 Beiträge
 
Delphi 10.1 Berlin Starter
 
#37

AW: CMD mit Output

  Alt 29. Mär 2019, 10:39
Hallo, jetzt zum letzten Mal dieses Thema!
Das Installationsdatum aislesen klappt jetzt, sowohl mit InstallDate als auch mit InstallTime. Nur mit der Zeitzone komme ich nicht klar Mit SystemInfo ermittelt ist Datum-Zeit 13.05.2018 10:47 . Ohne Anpassung ergibt es 09:47 mit der function hier aus dem Forum 11:47. Was ist jetzt richtig?

Delphi-Quellcode:
function DateTimeToLocalTimeDT(dt: TDateTime): TDateTime;
var
  tzi: TTimeZoneInformation;
  lt, st: TSystemTime;
begin
  GetTimeZoneInformation(tzi);
  DateTimeToSystemtime(dt, st);
  SystemTimeToTzSpecificLocalTime(@tzi, st, lt);
  Result := SystemTimeToDateTime(lt);
end;
Willie.
Miniaturansicht angehängter Grafiken
screenshot-2019-03-29-10.12.53.jpg  
Gut hören kann ich schlecht, schlecht sehen kann ich gut - Ersteres stimmt nicht, das zweite schon.
  Mit Zitat antworten Zitat