[Страдалецъ]

Ну сделайте вы общий класс и плодите экземпляры от него и будут вам для каждого монстра свои параметры:

Код:

Type
TMonsterState = (msLive, msDead); 
TMonster = class
 Location: TPoint;
 State: TMonsterState;
end;
...
Var
 Orda: Array of TMonster;
begin
 SetLength(Orda, 0);
 for i := 1 to 100
 do begin
     SetLength(Orda, Length(Orda)+1);  
     Orda[High(Orda)] := TMonster.Create;
     Orda[High(Orda)].Location.X := Random(100);   
     Orda[High(Orda)].Location.Y := Random(100);   
     Orda[High(Orda)].State := msLive;
     end; 
end;