type AIGeneticCreature = class(
AIMatingSingleCreature
)
AIMatingSingleCreature
> AICreature
> AILivingThing
> AIThing
> AIBaseObject
![]() |
Constructor Create(aParent: pointer); |
![]() |
Destructor Destroy; override; |
![]() |
procedure FullDisplay(aList: TStrings); override; |
![]() |
function GetDNA: pointer; override; |
![]() |
function HasDNA: boolean; override; |
![]() |
procedure LoadFromFile(var aFile: TextFile); override; |
![]() |
procedure MateWithPartner; override; |
![]() |
function OneLineDisplay: string; override; |
![]() |
procedure Perform(aActivity: integer); override; |
![]() |
procedure SaveToFile(var aFile: TextFile); override; |
![]() |
Constructor Create(aParent: pointer); |
create and delete
![]() |
Destructor Destroy; override; |
![]() |
procedure FullDisplay(aList: TStrings); override; |
![]() |
function GetDNA: pointer; override; |
![]() |
function HasDNA: boolean; override; |
DNA access
![]() |
procedure LoadFromFile(var aFile: TextFile); override; |
![]() |
procedure MateWithPartner; override; |
![]() |
function OneLineDisplay: string; override; |
display routines
![]() |
procedure Perform(aActivity: integer); override; |
user-interface and bot-interface
![]() |
procedure SaveToFile(var aFile: TextFile); override; |
file load/save routines
![]() |
property DNA: AIDNA; |
![]() |
property DNA: AIDNA; |