TContainedAction

type TContainedAction = class(TBasicAction)

protected

  procedure ReadState(); override;

  function SecondaryShortCutsCreated;

  function CreateShortCutList; virtual;

  property SavedEnabledState: Boolean; [rw]

  function HandleShortCut; virtual;

  procedure SetAutoCheck(); virtual;

  procedure SetCaption(); virtual;

  procedure SetName(); override;

  procedure SetChecked(); virtual;

  procedure SetEnabled(); virtual;

  procedure SetGroupIndex(); virtual;

  procedure SetHelpContext(); virtual;

  procedure SetHelpKeyword(); virtual;

  procedure SetHelpType(); virtual;

  procedure SetHint(); virtual;

  procedure SetVisible(); virtual;

  procedure SetShortCut(); virtual;

  procedure SetImageIndex(); virtual;

  procedure SetStatusAction(); virtual;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Assign(); override;

  function GetParentComponent; override;

  function HasParent; override;

  procedure SetParentComponent(); override;

  property ActionList: TContainedActionList; [rw]

  function Suspended; override;

  property Index: Integer; [rws]

  property DisableIfNoHandler: Boolean; [rw]

  property AutoCheck: Boolean; [rw]

  property Caption: string; [rw]

  property Checked: Boolean; [rw]

  property Enabled: Boolean; [rw]

  property GroupIndex: Integer; [rw]

  property HelpContext: THelpContext; [rw]

  property HelpKeyword: string; [rw]

  property HelpType: THelpType; [rw]

  property Hint: string; [rw]

  property Visible: Boolean; [rw]

  property ShortCut: Classes.TShortCut; [rw]

  property SecondaryShortCuts: TCustomShortCutList; [rws]

  property ImageIndex: TImageIndex; [rw]

  function DoHint(); dynamic;

  property OnHint: THintEvent; [rw]

  property StatusAction: TStatusAction; [rw]

published

  property Category: string; [rw]

end;

TContainedAction

TObject