Timer

[P.A.P.]

Im Moment hab ich einen Button der den Timer startet. In dem Timer steht dann folgendes:
procedure TForm1.Timer1Timer(Sender: TObject);
var
zähler: Real;

begin
zähler:=zähler+0.1;
PZeit.caption:=FloatToStr(zähler);
end;

Dann setzt es den Timer aber immer wieder auf 0 zurück und zeigt immer 0.1 an...
und wie man denn stoppt weiß ich noch nicht so ganz