Label nach Edit1.Text blinken lassen

[mr-unbekannt]

hello

sorry für meine umständliche ausdrucksweise...

also... ich möchte dass ein label nach dem Intervall, das in EDit1 eingegeben wurde blinkt

nur da wo der fette text ist, tritt ein Fehler auf: Inkompatible Typen: Cardinal + TCaption?!?

so:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if Label1.Visible = True then Label1.Visible := False
else Label1.Visible := True;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Enabled := True;
Timer1.Interval := [b]Edit1.Text[/b]


end;