ich habe ein kleines kosmetisches Problem mit einer Progressbar.
Ich habe folgenden Code geschrieben (Prozent ist ein transparentes Label, das ich mittig über die ProgressBar gelegt habe, um den Fortschritt auch in Prozent anzeigen zu lassen):
Code: Alles auswählen
Bildnr := 1; Stop := FALSE;
WHILE (NOT Stop) AND (Bildnr <= ParamCount) DO
BEGIN
ProgressBar1.Position := Round (((Bildnr-1)/ParamCount)*100);
Prozent.Caption := IntToStr (ProgressBar1.Position) + '%';
Application.ProcessMessages;
(...)
Das Prozent-Label zeigt mir die korrekte Prozentzahl an (also z.B. 0, 33, 67, 100). Die Progressbar hinkt aber hinterher; d.h. der Balken hat die Länge (0, 0, 33, 67). Wisst ihr, woran das liegen und wie ich das abstellen könnte?
Danke für die Hilfe!