Hallo,
hier ein kleines bsp. wie man ein Progressbar zum laufeen bringt.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i : Integer;
begin
ProgressBar1.Min:=0;
ProgressBar1.Max:=100;
for i:=0 to 100 do
begin
ProgressBar1.Position:=i;
Sleep(50); // --> ist natürlich nur da, um das beispiel noch ein bisschen zu veranschaulichen, wenn es jemand ausprobiert
end;
end;