Timer einstellen

[Flemichin]

Omg, ich hoffe, dass ich in diesem Forum richtig bin...

Folgendes Problem: Ich will über den Edit den Intervall des Timers einstellen lassen. Habe mir gedacht, ich benutze VAR, wie bei einem Währungsrechner etc. Leider ist meine Idee Müll, oder ich mache etwas falsch.
Bisher habe ich das da stehen:

procedure TMyForm.Ed1Change(Sender: TObject);

var zahl1: Integer;

begin

zahl1 := StrToInt (Ed1.text);
timer.interval := IntToStr (zahl1.text);

Mein Edit heißt Ed1