type AIAttachment = class(AILink)
AILink > TLinkObject![]() |
procedure Attach(aThing: AIThing); |
![]() |
procedure Detach; |
![]() |
function Empty: boolean; |
![]() |
function Holding: boolean; |
![]() |
procedure Attach(aThing: AIThing); |
![]() |
procedure Detach; |
![]() |
function Empty: boolean; |
![]() |
function Holding: boolean; |