![]() |
Millisekunden in Sekunden umrechnen
Ich komme gerade leider nicht drauf. Aber wie rechnet man in Delphi Millisekunden nach Sekunden um, sodass ich alles einzeln habe?
Aus 3699 wird dann beispielsweise 3 [sekunden] 699 [ms] Ob das der richtige Weg ist?
Delphi-Quellcode:
MSDouble := AMSSeconds / 1000;
H := AMilliSeconds div 3600000; M := AMilliSeconds mod 3600000 div 60000; S := AMilliSeconds mod 3600000 mod 60000 div 1000; MS := Frac(MSDouble); |
AW: Millisekunden in Sekunden umrechnen
Vergiss nicht zu kürzen!
zB ist es schneller
Delphi-Quellcode:
zu rechnen.
sec := (mssec div 1000) mod 60
Sherlock |
AW: Millisekunden in Sekunden umrechnen
Wenn ich es schon schaffen würde 3234567890 korrekt aufzuteilen, dann könnte ich auch ans kürzen denken :lol:
Stattdessen ist bei 2147483647 Ende. |
AW: Millisekunden in Sekunden umrechnen
Ich würde das so machen:
Delphi-Quellcode:
uses
System.SysUtils, System.TimeSpan; var span: TTimeSpan; begin span := TTimeSpan.FromMilliseconds(3234567890); Writeln(Format('%d [Std] %d [Min] %d [Sek] %d [ms]', [span.Hours, span.Minutes, span.Seconds, span.Milliseconds])); end; |
AW: Millisekunden in Sekunden umrechnen
Zitat:
Sekunden = Ausgangswert / 1000 ohne Rest Millisekunden = Der Rest, der beim / abgeschnitten wird.
Delphi-Quellcode:
function Rechnemal(const Alles : Int64; var Sekunden : Int64; var Milli : Int64) : Boolean;
begin Sekunden := Ales DIV 1000; Milli := Alles MOD 1000; Result := (Sekunden + Milli) = Alles; end; |
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Den Link habe ich gar nicht gesehen.
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Ich bin ja noch immer für eine verschärfte Registrierung. Mindestens Captcha.
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Und was ist mit einer manuellen Freischaltung durch einen berechtigten Nutzer des Forums? So war das früher doch auch.
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
Was ist denn ein "berechtigter Nutzer"? Jemand, der endlos lange Diskussionen über z.B. W10 anzettelt oder jemand, der kurz (und "fies") mal nachfragt, was das Ganze eigentlich soll? Jemand, der VB-Programme in Delphi (nonVCL) nachprogrammieren will, aber von höherer Mathe fast keine Ahnung hat? Für diese Entscheidung(en) beneide ich weder die Mods noch Daniel... Früher (TM) war halt Alles besser :oops::thumb: |
AW: Millisekunden in Sekunden umrechnen
Wir haben noch nie neue Mitglieder von Hand frei geschaltet.
Beitrag einfach melden und wir kümmern uns drum. |
AW: Millisekunden in Sekunden umrechnen
Zitat:
Text-/Leseverständnis: Mangelhaft. Tut mir Leid nicht deiner Meinung zu sein! Wieviel Tage Urlaub (im Forum gesperrt) habe ich mir denn durch meine Meinung denn inzwischen verdient? Fracht sich old7 |
AW: Millisekunden in Sekunden umrechnen
Dolly hatte geschrieben:
Zitat:
Jetzt bitte wieder zurück zum Thema des Threads. |
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Bitte kommt wieder zurück zum Thema!
|
AW: Millisekunden in Sekunden umrechnen
Zitat:
Zitat:
|
AW: Millisekunden in Sekunden umrechnen
Wenn wir schon bei "Performance" sind, nimm doch direkt
Delphi-Quellcode:
.
DivMod
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:40 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