Time to Integer

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von Nine9 · begonnen am 19. Okt 2022 · letzter Beitrag vom 19. Okt 2022

Vorheriger Beitrag

Nächster Beitrag

juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.176 Beiträge

Delphi 11 Alexandria

AW: Time to Integer

19. Okt 2022, 18: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.

markieren

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)