type AIWeapon = class(AITool)
AITool > AIThing > AIBaseObject![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Perform(aActivity: integer); override; |
![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Perform(aActivity: integer); override; |