Progressbar durchlaufen lassen

[TheMiller]

HI,

gibt es eine Möglichekeit, die Progressbar wie bei dem Start von Windows durchlaufen zu lassen? Wenn es dazu eine Komponente gibt, wäre dies auch ok...

[klaus.meyer]

schreib einfach in einen timer:

Delphi-Quellcode:

progressbar1.Position:= progressbar1.Position +1;
if progressbar1.Position= 100 then
progressbar1.Position:=1;

den timer kannst du ja dann ausschalten, wenn es fertig geladen ist

[freak4fun]

Aber die läuft nicht durch. Vielleicht selber eine zeichnen?
Oder schreib doch selber eine Komponente.


MfG
freak

[klaus.meyer]

er könnte ja eine shape als rechteck nehmen und immer die länge vergrößern oder verkleinern ?

[Pr0g]

Wenns nur unter XP laufen muss, dann guck dir das mal an: Link.

MfG Pr0g

[TheMiller]

Danke. Funzt einwandtfrei