type AIGrass = class(
AIPlant
)
AIPlant
> AILivingThing
> AIThing
> AIBaseObject
![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Fuel; override; |
![]() |
procedure Grow; |
![]() |
function IsFruit: boolean; override; |
![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Fuel; override; |
![]() |
procedure Grow; |
![]() |
function IsFruit: boolean; override; |