![]() |
Zeitcode
Hallo,
03:00:00:12 - 01:00:00:12 = 02:00:00:00 Wie kann ich berechnen? TimeCodeInEdit 01:00:00:00 TimeCodeOutEdit 02:00:00:00 TimeCodeDurationEdit'e Edit2 - Edit1 = 01:00:00:00 S1, S2: TDateTime; begin S1 := StrToTime(Edit1.Text); S2 := StrToTime(Edit2.Text); Edit3.Text := (TimeToStr(S1 - S2)); |
AW: Zeitcode
Wieso machst bu bei jeder Korrektur einen neuen Thread auf?
|
AW: Zeitcode
Was soll denn dies bedeuten: 03:00:00:12?
|
AW: Zeitcode
Ich habe die anderen Threads gelöscht.
|
AW: Zeitcode
Ich würde es so machen. Ist nur eine Idee. Ungetestet.
Die Zeit erst einmal in Sekunden umrechnen (Funktion)
Delphi-Quellcode:
Dann die Differenz berechnen
uses System.TimeSpan;
function TimeToMilliSeconds(TimeString: string): Double; var TimeSpan: TTimeSpan; begin TimeSpan := TTimeSpan.Parse(TimeString); Result := TimeSpan.TotalMilliseconds; end;
Delphi-Quellcode:
DifferenzMilliSekunden := (TimeToMilliSeconds(cIn) - TimeToMilliSeconds(cOut)); Das ist sicherlich auch ganz anders möglich mit TDateTime (StrToDateTime) oder anders. |
AW: Zeitcode
Zitat:
Delphi-Quellcode:
Vorschlagen, damit hast Du die Differenz in Sekunden, die einfach wieder in Std:Min:Sek hochrechnen. Millisekunden besteht aus 4 Ziffern weswegen ich einfach mal von einem Schreibfehler ausgeh.
SecondsBetween(TDateTime1,TDateTime2)
|
AW: Zeitcode
Zitat:
|
AW: Zeitcode
Zitat:
Okay okay, Herr Raabe hat natürlich mal wieder Recht, gerade mal nachgeschaut: Zitat:
|
AW: Zeitcode
Ist mein Vorschlag somit hinfällig?
|
AW: Zeitcode
Zitat:
![]() |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:52 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz