Zitat von
himitsu:
zurücksetzen passiert quasi sofort
Lösung:
Delphi-Quellcode:
PB.Position := i + 1;
PB.Position := i;
bzw.
Delphi-Quellcode:
PB.Position := Max(i + 1, PB.Max - 1);
PB.Position := i;
Was meist du mit zurücksetzen?
Hab deine Codes mal getestet, leider ändert sich nichts am Verhalten
mfg
Helmi 
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<