"Sleep"-t das programm wenn man...

[Medium]

Zitat von DArc:

Delphi-Quellcode:

if (Gewicht = Gewicht div 100 * 100) then
begin
sProgressBar1.Position := 100;
sButton1.Visible := False;
sButton2.Visible := True;
sButton3.Visible := False;
end;

*schüttel*

sProgressBar1.Position := Round((Gewicht/MaxGewicht)*100); Einfachste Prozentrechnung. Sollte man auch mit 15 schonmal gesehen haben

Edit: Application.ProcessMessages(); ist meist auch ein Indiz dafür, dass man hier mit einem Thread wohl besser bedient wäre. ProcessMessages ist bei solchen Vorgängen eher ne Quick'n'Dirty-Krücke als denn eine angemessene Lösung. Geht, ist aber nicht wirklich elegant, und je nach dem in welchen Intervallen man es aufruft führt es dennoch zu Stocken bei der Anzeige/Bedienung.