Registriert seit: 26. Nov 2003
Ort: Halle/Saale
4.343 Beiträge
Delphi 11 Alexandria
|
Re: ProgresBar
18. Aug 2008, 16:20
ProgressBar.Min := 0;
ProgressBar.Max := 60;
ProgressBar.Position := ProgressBar.Max;
ProgressBar.Step := -1;
Timer jede Sekunde feuern lassen und dabei:
ProgressBar.StepIt;
if ProgressBar.Position < 1 then Close;
Dann kannst Du die Zeit (in Sekunden) durch ProgressBar.Max einstellen.
Stahli
|