Einzelnen Beitrag anzeigen

N4r0

Registriert seit: 7. Feb 2010
14 Beiträge
 
#26

Re: Space Invaders in Delphi5

  Alt 15. Feb 2010, 22:46
Ich habe die Klassen mal nachgbaut und wollte nun die Prozeduren und Funktionen reinschreiben.
Nur leider blick ich jetzt nicht mehr wirklich durch.

Hiermit:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
  i,j: integer;
begin
  FSprites := TObjectList.Create(True);
  for i := 0 to 8-1 do
    for j:= 0 to 3-1 do
      FSprites.Add(TInvader.Create(self, Point(i*30, j*20)));
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
  i,j: integer;
begin
  for i := 0 to FSprites.Count-1 do
    TSprite(FSprites[i]).Move;
  ...
end;
werden die Sprite Images ja irgendwie wieder als eine Art Array betrachtet.

Kannst du mir das vielleicht nochmal erklären?
  Mit Zitat antworten Zitat