TBasicActionLink class

In unit Classes

Link between actions and action clients (e.g. controls).

Declaration

pascal

TBasicActionLink = class(TObject)

Inheritance

TBasicActionLink
TObject

Descends from it: TActionLink

Description

TBasicActionLink links an Action to its clients. With each client for an action, a TBasicActionLink class is instantiated to handle the communication between the action and the client. It passes events between the action and its clients, and thus presents the action with a uniform interface to the clients.

An application programmer should never use a TBasicActionLink instance directly; They are created automatically when an action is associated with a component. Component programmers should create specialized descendants of TBasicActionLink which communicate changes in the action to the component.

Properties

Action public The action to which the link was assigned.

Methods

`AssignClient`	protected	Assigns a control (client) to the action link.
`Change`	protected	Executed whenever the Action is changed.
`IsOnExecuteLinked`	protected	Returns whether the client has it's OnExecute property linked.
`SetAction`	protected	Sets the action with which the actionlink is associated.
`SetOnExecute`	protected	Assigns the OnExecute handler to the client.
`Create`	public	Creates a new instance of the TBasicActionLink class.
`Destroy`	public	Destroys the TBasicActionLink instance.
`Execute`	public	Calls the action's Execute method.
`Update`	public	Calls the action's Update method.

Events

OnChange public Event handler triggered when the action's properties change.

Fields

FAction protected The action with which this link is associated.

Inherited

From TObject (40)

AfterConstruction BeforeDestruction CheckDisposed ClassInfo ClassName ClassNameIs ClassParent ClassType CleanupInstance DefaultHandler DefaultHandlerStr Dispatch DispatchStr Disposed DisposeOf Equals FieldAddress Free FreeInstance GetDisposed GetHashCode GetInterface GetInterfaceByStr GetInterfaceEntry GetInterfaceEntryByStr GetInterfaceTable GetInterfaceWeak GetLastCastErrorInfo InheritsFrom InitInstance InstanceSize MethodAddress MethodName newinstance QualifiedClassName SafeCallException StringMessageTable SystemHasExtendedRTTI ToString UnitName

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.