Timer starten nach schließen mit caHide

[peter314]

Hallo erstmal

Beim Programmieren bin ich auf folgendes Problem gestoßen.
Ich starte einen Timer nachdem ich die Form mit caHide geschlossen habe, aber irgendwie scheint der nicht ui starten. Mach ich was falsch oder irgendwas falsch verstanden (mit caHide)?

Hier mein Text:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Close;
end;

procedure TForm1.FormClose(Sender: TObject; var Action:TCloseAction);
begin
Action:= caHide;
Timer1.Enabled:= true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
b:= b+1;
if b=10 then
begin
Showmessage('Läuft');
Timer1.Enabled:= false;
end;
end;

Danke im voraus
peter

p.s. ich weiß leider nicht welche Programmiersprache ich benutze, dass wird in der Schule einfach so beigebracht