type AISeed = class(AIPlant)
AIPlant > AILivingThing > AIThing > AIBaseObject![]() |
procedure Cease; override; |
![]() |
function Digest(const aAmount: integer): integer; override; |
![]() |
procedure Fuel; override; |
![]() |
procedure Cease; override; |
![]() |
function Digest(const aAmount: integer): integer; override; |
![]() |
procedure Fuel; override; |