type AISun = class(AIOrbiter)
AIOrbiter > AISatellite > AIThing > AIBaseObject![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Explode; override; |
![]() |
procedure Fuel; override; |
![]() |
procedure FullDisplay(aList: TStrings); override; |
![]() |
Constructor Create(aParent: pointer); |
![]() |
procedure Explode; override; |
![]() |
procedure Fuel; override; |
![]() |
procedure FullDisplay(aList: TStrings); override; |
![]() |
property Swing: boolean; |
![]() |
property Swing: boolean; |