Variable auf Form setzen

[Delphi-Narr]

Klappt aber trotzdem irgendwie nicht...

Delphi-Quellcode:

procedure TForm4.Button1Click(Sender: TObject);
var F:TForm;
begin
     F:=FindComponent('Form'+IntToStr(4)) as TForm;
     showmessage(F.name);
end;

Gibt eine Fehlermeldung (Zugriffsverletzung bei Adresse...)