Progressbar langsamer laufen lassen

[tobiasw]

hi

ich habe eine Progressbar diese soll jetzt bis nach 100 laufen das ganze hab ich über ne Schleife realisiert.
Die so aussieht:

Delphi-Quellcode:

var i:integer;
begin
i:=1;
for i:=1 to 100 do
begin
progressbar1.StepBy(i);
end;

Das ganze funktioniert auch. Wie ist es denn möglich das ich diese Progressbar langsamer laufen lassen das sie zum beispiel 40sec braucht um auf hundert prozent zu kommen

Gruß

[vollmer-net]

timer oder delay

[tobiasw]

kannst mir dazu mal code geben weil ich das noch nie gemacht habe

[Ultimator]

Delay oder TTimer

[arbu man]

Delphi-Quellcode:

var i:integer;
begin
i:=1;
for i:=1 to 100 do
begin
progressbar1.StepBy(i);
sleep(400);
end;

[tobiasw]

jetzt hab ich mir den Code mal eingefügt. Gut es läuft wie ich es wollte nur es hört gar net mehr auf zu laufen so das ich auf die Anwendung nicht mehr beenden kann.

Delphi-Quellcode:

var i:integer;
begin
i:=1;
for i:=1 to 100 do
begin
progressbar1.StepBy(i);
sleep(400);
end;

[Ultimator]

Du machst da was falsch: TProgressBar.StepBy(i) erhöht den angezeigten Prozentsatz um i, du solltest also besser TProgressBar.StepIt nehmen ;-)

[arbu man]

Wenn es zu lange dauert nim einen geringern wert bei sleep

slepp(40);

sleep hält das programm für die in den klammern genanten milisekunden an

[tobiasw]

Jetzt wird es ja immer geiler. Die Progress Bar läuft jetzt paar mal durch bis hundert und dann ist Schluss. Sau komisch, ich will doch einfach das sie nur bis hundert läuft und dann Schluss ist. Das Prob ist ja man sieht das es auf hundert ist aber das Prog reagiert gar nicht das dauert dann eine Zeit und dann geht es wieder

[Marco Haffner]

Dann guck Dir mal die Eigenschaft Step von TProgressBar an.