Массив спрайтов

[Dj_smart]

Всем доброго времени суток.
Значит проблема. Никак не могу разобратся.
Есть например DelphiX, создаю класс, например TGamer:

type
  TGamer = class(TimageSprite)
  protected
    procedure DoMove(MoveCount: integer); override;
    procedure DoCollision(Sprite: TSprite; var Done: Boolean); override;
  end;

И вопрос. Как создать массив таких спрайтов? То есть чтобы можно было потом к ним обращатся типа
Gamer[n].x:=300;
Заранее спс.

[alexBlack]

Тогда, наверное, не gamer[n], а gamers[n].

type
    TGamers = class
    private
       FList : TList;     // хранятся объекты TGamer
       function getGamers(i:integer):TGamer;
    public
       property gamers[i:integer] : TGamer read getGamers;
       function count:integer;        // возвращает FList.count
       constructor ..                     // для создания FList
       destructor...
       function NewGamer(...):TGamer;  // для добавления объекта в список
       procedure delete(G:TGamer);
    end;

var gamers : TGamers;

gamers := TGamers.create;
G := gamers.newGamer(...); 
G := gamers[n];
gamers[n].X := ...

[Dj_smart]

Спасибо, вроде оно. Пойду проверять... +

[CyberOrcX]

Привет, народу! У меня проблема, такая, как нарисовать меню в DelphiX? Помогите плиз.

[mutabor]

Какое ты хочешь меню? Как должно выглядеть?