Komponenten über Befehl erstellen

[rawsoul]

Merci!

Das ist mein aktueller Stand.

Noch ein Problem...

Delphi-Quellcode:

procedure TForm1.enemyTIMERTimer(Sender: TObject);
begin
  repeat
    begin
      Setlength(enemy1, high(enemy1)+2);
      enemy1[number]:=timage.create(self);
      with enemy1[number] do
        begin
          parent:=self;
          left:=0;
          picture.loadfromfile('gfx\enemy2.bmp');
          transparent:=true;
          top:=2*raster+random(64);
        end;
      number:=number+1
    end
    until number=stage*2
end;

Sobald ich den Timer aktiviere, hängt sich die exe auf. Was stimmt da schon wieder nicht?

//edit
Hat sich erledigt, der Buffer war überlastet...