type TMuggleAttachment = class(
TMuggleLink
)
TMuggleLink
> TLinkObject
procedure Attach(aThing: TMuggleObject); |
|
procedure Detach; |
|
function Empty: boolean; |
|
function Holding: boolean; |
procedure Attach(aThing: TMuggleObject); |
procedure Detach; |
function Empty: boolean; |
function Holding: boolean; |