Runden

[MKX]

Ich habe die CPU-Leistung in einer Variable vom Typ eXtended gespeichert. Allerdings gibt es da mindestens zehn Nachkommastellen. wie bringe ich das Programm dazu, diese Zahl auf eine mit z.B. nur 3 Nackommastellen zu Runden?

[Nuclear-Ping]

Mit FormatFloat?

[dahead]

du kannst dazu den Befehl Format verwenden:

Format('%.2f % Cpu Last', [ECPULast]);

[Chrissi91]

Die Kommazahlen kannst du mit round(cpu) runden. Ich denke mal, das dies, wie du es haben willst ähnlich geht. Bsp.: Excel: runden(B5;3)

Ich schau mal in meinen Projekten. Hab ich noch irgendwo tief vergraben ;)

[Nuclear-Ping]

Round liefert einen Integer zurück, kein Float / Double / Extended.

[alzaimar]

Runden geht so:

Delphi-Quellcode:

Function DecimalRound (aValue, aGranularity : Extended) : Extended;
Begin
  Result := Int (0.5 + aValue/aGranularity(*aGranularity;
End;

aValue ist der Wert, der gerundet werden soll, und zwar entsprechend der Granularität.

Delphi-Quellcode:

x := DecimalRound (123.4567,10); // x = 120
x := DecimalRound (123.4567, 5); // x = 125
x := DecimalRound (123.4567,0.1); // x = 123.5
x := DecimalRound (123.4567,0.01); // x = 123.46

etc.