Fehlermeldung Listenindex überschreitet das Maximum

[dome0501]

Hallo Gebhard

Hier der Quelltext:
begin
Application.Initialize;
Application.Title := 'Spielanzeige';
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3); <--Die Zeile Markiert der Debugger
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm6, Form6);
Application.Run;
end.