
Zitat von
Dax:
Eine Genauigkeit von 0,1% dürfte für
GUI-Apps ausreichen

So wie du die Klammer bei Round() setzt wird es wohl eher total ungenau sein.
Nehmen wir mal an
Delphi-Quellcode:
PB_Max:= 8000;
PB_Position:= 6000;

Zitat von
Dax:
Position := Round(PB_Position / PB_Max) * 1000
macht Round(0,75) ist gleich 1 * 1000 = 1000 und 750 wäre richtig gewesen.