Gibt mehrere Lösungen. Eine währe:
Delphi-Quellcode:
Progressbar1.Step := 1;
for i:= 1 to 100 do
begin
listbox1.items.add(inttostr(i));
Progressbar1.Stepit;
Das wird aber so schnell gehen, das du das mit dem Auge wohl nicht wahrnimmst
also baue event noch ein sleep ein.