Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.175 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Time to Integer

  Alt 19. Okt 2022, 19:20
Welche Genauigkeit soll das Ergebnis haben?
Wenn Sekunden reichen, dann könnte man etwa sowas machen. Vorteil: Der Wert lässt sich auch wieder als Time zurück konvertieren.

Delphi-Quellcode:
StrToIntDef(FormatDateTime(‚hh‘, <dein Datntyp Time>, 0) * 3600 +
StrToIntDef(FormatDateTime(‚nn‘, <dein Datntyp Time>, 0) * 60 +
StrToIntDef(FormatDateTime(‚ss‘, <dein Datntyp Time>, 0)
Das Ergbnis wäre in Sekunden und ein Integerwert, wenn die Anzahl der Sekunden im Bereich eines Integers passen, aber dazu ist die Frage zu ungenau
Habe grad keine Möglichkeit am PC, nur über Tablet
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat