Hmm... leider bewegt sich da dann nix
EDIT:
Habs jetzt mal so gemacht, eigentlich müsste das doch gehen, dass jetzt für alle Panels die Position geändert wird?
Delphi-Quellcode:
procedure TFPanel1.Timer1Timer(Sender: TObject);
var i: integer;
begin
for i:=0 to ComponentCount-1 do begin
if Components[i] is TFPanel1 then
TFPanel1(Components[i]).Left:= Random(ShSpiel.Width)-25;
TFPanel1(Components[i]).Top:= Random(ShSpiel.Height)-25;
Bei mir kommt aber auch da ne Fehlermeldung... Ich bin langsam am verzweifeln.