type TMuggleLinkContainer = class(
TLinkContainer
)
TLinkContainer
> TMuggleBaseContainer
> TActiveList
procedure FullDisplay(aList: TStrings); override; |
|
function NewLink(aLeftObject: TMuggleBaseObject): TMuggleLink; overload; |
|
function NewLink(aLeftObject: TMuggleBaseObject; aRightObject: TMuggleBaseObject): TMuggleLink; overload; |
procedure FullDisplay(aList: TStrings); override; |
function NewLink(aLeftObject: TMuggleBaseObject): TMuggleLink; overload; |
function NewLink(aLeftObject: TMuggleBaseObject; aRightObject: TMuggleBaseObject): TMuggleLink; overload; |