Ereignis bei Timer.Tick funktioniert nicht

[blade236]

Guten Abend,
Ich habe vor kurzen mit Delphi.net angefangen und wollte jetzt in ein kleines Spiel das ich programmiere, einen einen Sekunden Timer einbauen.
Ich wollte in einem Intervall von 1000 ms, die Zahl in einem Label in jeder Sekunde +1 nehmen.
Leider wird das Tick Ereignis nur 1mal ausgeführt .

Delphi-Quellcode:

 

unit WinForm;

interface

uses
  System.Drawing, System.Collections, System.ComponentModel,
  System.Windows.Forms, System.Data, sysutils;

procedure TWinForm.Timer1_Tick(sender: System.Object; e: System.EventArgs);
var zahl:integer;
begin
label1.Text:=inttostr(zahl+1);

end;

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);

begin
     timer1.enabled:=true;

end;

end.

Ist sicher ein dummer Fehler aber helft mir trotzdem bitte.
mfG blade236