TToolButtonActionLink

type TToolButtonActionLink = class(TControlActionLink)

protected

  procedure AssignClient(); override;

AssignClient calls inherited method then sets client as ToolButton.

  procedure SetChecked(); override;

SetChecked - stores the Checked status (True or False).

  procedure SetImageIndex(); override;

SetImageIndex - stores the index value of the associated image.

public

  function IsCheckedLinked; override;

Is the action's Checked property linked to the client?

  function IsImageIndexLinked; override;

Indicates if the action's ImageIndex property linked to the client.

end;

TToolButtonActionLink

TToolButtonActionLink - links a ToolButton on the ToolBar to an Action on an ActionList.

TControlActionLink

Links an Action to a control.

TActionLink

A link between an action and a client class.

TBasicActionLink

TObject