(@) Jelly ähm jo ...
Delphi-Quellcode:
procedure TForm1.Button1OnClick(Sender: TObject);
begin
Progressbar1.Position:=Progressbar1.Min;
Progressbar1.Max:=strtoint(edit1.text);
Timer1.enabled:=true;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if Progressbar1.Position<Progressbar1.Max
then Progressbar1.StepIt
else enabled:=false;
end;
Das habe ich verwendet Danke.
nun habe ich noch ein anderes Problem umd zwar is das Programm während dieser Zeit wo die Procressbar zählt nicht ansprechbar sodass ich einen anderen button drücken könnte ..