Sekunden und Millisekunden anzeigen

[TheMiller]

Das würde natürlich einiges Erklären...

Ich probiere das dann mal aus...

Danke und bis dann!

[TheMiller]

So, das funzt jetzt soweit, um die Millisekunden auszurechnen, habe ich noch eine Zeile hinzugefügt und scheint auch richtig zu sein. Schaut bitte nochmal.

Aber wenn ich jetzt das Format ausgebe, dann zeigt er mir 3 Stellen an, wieso??

Delphi-Quellcode:

var
  s, ms: Word;
  Diff: Integer;
begin
  Diff:=GetTickDiff(BPMStartTime, GetTickCount());
  s:=Diff div 1000;
  ms:=Diff mod 1000;
  Form1.Caption:=Format('%.2d:%.2d', [s, ms]);

Danke für eure Hilfe

[mashutu]

Zitat von DJ-SPM:

Aber wenn ich jetzt das Format ausgebe, dann zeigt er mir 3 Stellen an, wieso??

vielleicht, weil Du eine dreistellige Zahl hast?

[Matze]

Zitat von DJ-SPM:

Aber wenn ich jetzt das Format ausgebe, dann zeigt er mir 3 Stellen an, wieso??

Mit der Format-Funktion gibst du in deinem Fall die maximale Anzahl von 2 Nachkommastellen an. Da du jedoch keine Nachkommastellen hast, ist dieser Teil der Format-Funktion überflüssig. Die ganzzahlige Teil einer Zahl bzw. in deinem Fall die Zahl selbst, an sich wird immer kommplatt dargestellt.
Was möchtest du denn genau erreichen?

[TheMiller]

Ich möchte Sekunden und Millisekunden zweistellig anzeigen lassen, also ungefähr so

15:26

Aber geteilt habe ich bei den ms richtig, oder?

[DeddyH]

Zitat von Matze:

Mit der Format-Funktion gibst du in deinem Fall die maximale Anzahl von 2 Nachkommastellen an. Da du jedoch keine Nachkommastellen hast, ist dieser Teil der Format-Funktion überflüssig. Die ganzzahlige Teil einer Zahl bzw. in deinem Fall die Zahl selbst, an sich wird immer kommplatt dargestellt.

Stimmt nicht ganz .

Zitat von OH:

d d
Dezimal. Das Argument muß ein Integerwert sein. Der Wert wird in einen String umgewandelt, der aus Dezimalzahlen besteht. Wenn der Format-String einen Bezeichner für die Genauigkeit enthält, muß der resultierende String mindestens die angegebene Anzahl von Stellen aufweisen. Enthält er weniger Stellen, wird der String auf der linken Seite mit Nullen aufgefüllt.

[Matze]

Und was habe ich da nun falsch gesagt?

Wenn ich angebe, eine 3-stellige Zahl soll mit 5 Stellen dargestellt werden, dann werden 2 Nullen vor die Zahl gesetzt. Ich meinte jedoch, er kann bei einer 3-stelligen Zahl nicht die letzte Ziffer abschneiden. Oder geht das doch?

@DJ: Ja deine Rechnung müsste stimmen. Millisekunden können von 0-999 gehen.

[DeddyH]

Sry, ich hatte Dich so verstanden, dass die Angabe einer Precision bei ganzen Zahlen überflüssig sei.

[Matze]

Ich bezog mich auf die der Nachkommastellen. Evtl. habe ich mich missverständlich ausgedrückt.

@DJ: Du kannst die Millisekunden natürlich so abschneiden:

Delphi-Quellcode:

// Digit: 10, 100, 1000, ...
function CutIntTo(Number: Integer; Digit: Byte): Integer;
begin
  Result := Number div Digit;
end;

Aufruf:

Format('%d:%d', [s, CutIntTo(ms, 10)]); Ich hoffe, ich habe nun keinen Denkfehler eingebaut.

[grenzgaenger]

Zitat von DJ-SPM:

Ich möchte Sekunden und Millisekunden zweistellig anzeigen lassen, also ungefähr so

15:26

Aber geteilt habe ich bei den ms richtig, oder?

normal nicht richtig geteilt. das format ist im allgemeinen HH:MM:SS.ms also stunden, minuten, sekunden zweistellig, mit 'n D-Punkt getrennt. die millisekunden werden an die sekunden drangehängt und mit einem punkt getrennt. dabei ist mir keine feste stellenzahl der millisekunden bekannt. entweder direkt anschliessen oder auf 3 stellen formatieren. <HTH>