Gauge und Timer

[poterp]

Morgen,
Timer und Gauge arbeiten. Ich glaube es die Möglichkeit geben, dass der Gauge auf z.b.: 85% stoppt
wenn ich zb folgendes mache:

Delphi-Quellcode:

procedure TDualListDlg.FormCreate(Sender: TObject);
begin
Gauge1.Progress:=50;
end;

bei Start steht er auf 50%. D.h es musst eine Moglichkeit geben mit der Timer auch ein Maximal Zahl
festzulegen oder?

Delphi-Quellcode:

procedure TForm1.btnClick(...); 
begin 
  Timer1.enabled := true; 
end; 

procedure TForm1.Timer1Timer(...); 
begin 
  Gauge1.MinValue:=0;
  Gauge1.MaxValue:=50;
  Gauge1.progress := gauge1.progress + 1; 
end;

Bitte wenn jemanden helfen kann?
mfg
poter