TActionLink

type TActionLink = class(TBasicActionLink)

protected

  procedure SetAutoCheck(); virtual;

SetAutoCheck - specifies the value of AutoCheck, whether True or False

  procedure SetCaption(); virtual;

SetCaption - specifies the string to be used as caption

  procedure SetChecked(); virtual;

SetChecked - specifies the value of the Checked property: True or False

  procedure SetEnabled(); virtual;

SetEnabled - specifies the value of the Enabled property: True or False

  procedure SetGroupIndex(); virtual;

SetGroupIndex - specifies the value for the Group Index

  procedure SetHelpContext(); virtual;

SetHelpContext - specifies the value to be used for context-sensitive Help

  procedure SetHelpKeyword(); virtual;

SetHelpKeyword - specifies the keyword to be used for Help

  procedure SetHelpType(); virtual;

SetHelpType - specifies the trpe of Help to be used

  procedure SetHint(); virtual;

SetHint - specifies the string to be used for Hints

  procedure SetImageIndex(); virtual;

SetImageIndex - specifies the index value for the image associated with the action

  procedure SetShortCut(); virtual;

SetShortCut - specifies the shortcut for the action

  procedure SetVisible(); virtual;

SetVisible - specifies whether or not the control for the action is Visible

public

  function IsCaptionLinked; virtual;

Is the action's Caption linked to the client?

  function IsCheckedLinked; virtual;

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

  function IsEnabledLinked; virtual;

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

  function IsGroupIndexLinked; virtual;

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

  function IsHelpContextLinked; virtual;

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

  function IsHelpLinked; virtual;

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

  function IsHintLinked; virtual;

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

  function IsImageIndexLinked; virtual;

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

  function IsShortCutLinked; virtual;

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

  function IsVisibleLinked; virtual;

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

end;

TActionLink

A link between an action and a client class

TBasicActionLink

TObject