Nimm dir die timer komponente zu Herzen. Sie führt alle vorgegebenen ms (millisekunden), den in ihr enthaltenen Quelltext aus (wenn aktiviert!).
Jetzt hast du deine Progressbar. Mit Progressbar.position kannst du eine bestimmte stelle ansteuern...
wenn du jetzt in deinen timer reinschreibst
Delphi-Quelltext
1:
| Progressbar.position := Progressbar.position + 10; |
Dann addiert sich die Progress Leiste im 1sek. Intervall fortlaufend mit 10!
wenn die progressbar auf 100% ist, benötigst du die Timer komponente ja nicht mehr. Du kannst sie also, wenn position = 100, deaktivieren lassen:
Delphi-Quelltext
1: 2: 3: 4:
| if Progressbar.position < 100 then Progressbar.position := Progressbar.position + 10; else timer.enabled:=false; |
So und jetzt rechne dir mal deine 4 Minuten zusammen
mfG,
Danny