Panel Spiel => Panel automatisch erzeugen?

[Juggy D]

Wenn ich das so mache, wie du es angegeben hast, dann kommt nach dem man auf Start klickt folgender Fehler:
Im Projekt Fang1 ist eine Exception der Klasse EInvalidCast aufgetreten. Meldung: Ungültige 'Typumwandlung'. Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.

Ich habs dann auch mal so probiert, geht aber auch nicht, bzw. nur ein Panel wird umpositioniert.

Delphi-Quellcode:

procedure TFPanel1.Timer3Timer(Sender: TObject);
var I: integer;
begin
for i:= ComponentCount-1 downto 0 do begin
if Components[i] is TFPanel1 then
Panel.Left:= Random(ShSpiel.Width)-25;
Panel.Top:= Random(ShSpiel.Height)-25;