type AITool = class(AIThing)
AIThing > AIBaseObject![]() |
Constructor Create(aParent: pointer); |
![]() |
Destructor Destroy; override; |
![]() |
procedure LoadFromFile(var aFile: TextFile); override; |
![]() |
procedure SaveToFile(var aFile: TextFile); override; |
![]() |
Constructor Create(aParent: pointer); |
![]() |
Destructor Destroy; override; |
![]() |
procedure LoadFromFile(var aFile: TextFile); override; |
![]() |
procedure SaveToFile(var aFile: TextFile); override; |
![]() |
property NextUse: integer; |
![]() |
property NextUse: integer; |