Class TxdkAddInMenuItem (unit XDKMenu)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

====================================================================


Functions

procedure Add(Item: TxdkAddInMenuItem);


procedure Click(Sender:TIMenuItemIntf);


procedure Delete(Index: Integer);


destructor Destroy;


function IndexOf(Item: TxdkAddInMenuItem): Integer;


procedure Insert(Index: Integer; Item: TxdkAddInMenuItem);


procedure Remove(Item: TxdkAddInMenuItem);


procedure ChangeFlags(const Value: TIMenuFlag; SetFlag: boolean);


procedure GetChildren(Proc: TGetChildProc; Root: TComponent);


function GetCount: Integer;


function GetItem(Index: Integer): TxdkAddInMenuItem;


function GetMenuIndex: Integer;


function GetParentComponent: TComponent;


function HasParent: Boolean;


procedure SetBarBreak(Value: Boolean);


procedure SetBreak(Value: Boolean);


procedure SetCaption(const Value: string);


procedure SetChecked(Value: Boolean);


procedure SetChildOrder(Child: TComponent; Order: Integer);


procedure SetEnabled(Value: Boolean);


procedure SetGroupIndex(Value: Byte);


procedure SetHelpContext(Value: THelpContext);


procedure SetMenuIndex(Value: Integer);


procedure SetParentComponent(Value: TComponent);


procedure SetRadioItem(Value: Boolean);


procedure SetShortCut(Value: TShortCut);


procedure SetVisible(Value: Boolean);


procedure Activate;


function GetFlags:TIMenuFlags;


procedure TurnSiblingsOff;


procedure VerifyGroupIndex(Position: Integer; Value: Byte);

if Self is not Root Item

Properties

property BarBreak : Boolean


property Break : Boolean


property Caption : string


property Checked : Boolean


property Enabled : Boolean


property GroupIndex : Byte


property HelpContext : THelpContext


property RadioItem : Boolean

property Hint: string read FHint write FHint; // Note: The IDE currently ignores this property !

property ShortCut : TShortCut


property Visible : Boolean


property Count : Integer


property Items : TxdkAddInMenuItem


property MenuIndex : Integer


property Parent : TxdkAddInMenuItem


Events

event OnClick : TNotifyEvent


Variables

FBarBreak : Boolean;


FBreak : Boolean;


FCaption : string;


FChecked : Boolean;


FEnabled : Boolean;


FGroupIndex : Byte;


FHelpContext : THelpContext;


FHint : string;


FItems : TList;


FMenu : TxdkAddInMenu;


FMenuIntf : TIMenuItemIntf;


FOnClick : TNotifyEvent;


FParent : TxdkAddInMenuItem;


FParentIntf : string;


FRadioItem : Boolean;


FRoot : Boolean;


FShortCut : TShortCut;


FVisible : Boolean;



Constructors


constructor Create(AOwner: TComponent);

====================================================================


Functions


procedure Add(Item: TxdkAddInMenuItem);


procedure Click(Sender:TIMenuItemIntf);


procedure Delete(Index: Integer);


destructor Destroy;


function IndexOf(Item: TxdkAddInMenuItem): Integer;


procedure Insert(Index: Integer; Item: TxdkAddInMenuItem);


procedure Remove(Item: TxdkAddInMenuItem);


procedure ChangeFlags(const Value: TIMenuFlag; SetFlag: boolean);


procedure GetChildren(Proc: TGetChildProc; Root: TComponent);


function GetCount: Integer;


function GetItem(Index: Integer): TxdkAddInMenuItem;


function GetMenuIndex: Integer;


function GetParentComponent: TComponent;


function HasParent: Boolean;


procedure SetBarBreak(Value: Boolean);


procedure SetBreak(Value: Boolean);


procedure SetCaption(const Value: string);


procedure SetChecked(Value: Boolean);


procedure SetChildOrder(Child: TComponent; Order: Integer);


procedure SetEnabled(Value: Boolean);


procedure SetGroupIndex(Value: Byte);


procedure SetHelpContext(Value: THelpContext);


procedure SetMenuIndex(Value: Integer);


procedure SetParentComponent(Value: TComponent);


procedure SetRadioItem(Value: Boolean);


procedure SetShortCut(Value: TShortCut);


procedure SetVisible(Value: Boolean);


procedure Activate;


function GetFlags:TIMenuFlags;


procedure TurnSiblingsOff;


procedure VerifyGroupIndex(Position: Integer; Value: Byte);

if Self is not Root Item


Properties


property BarBreak : Boolean


property Break : Boolean


property Caption : string


property Checked : Boolean


property Enabled : Boolean


property GroupIndex : Byte


property HelpContext : THelpContext


property RadioItem : Boolean

property Hint: string read FHint write FHint; // Note: The IDE currently ignores this property !


property ShortCut : TShortCut


property Visible : Boolean


property Count : Integer


property Items : TxdkAddInMenuItem


property MenuIndex : Integer


property Parent : TxdkAddInMenuItem


Events


event OnClick : TNotifyEvent


Variables


FBarBreak : Boolean;


FBreak : Boolean;


FCaption : string;


FChecked : Boolean;


FEnabled : Boolean;


FGroupIndex : Byte;


FHelpContext : THelpContext;


FHint : string;


FItems : TList;


FMenu : TxdkAddInMenu;


FMenuIntf : TIMenuItemIntf;


FOnClick : TNotifyEvent;


FParent : TxdkAddInMenuItem;


FParentIntf : string;


FRadioItem : Boolean;


FRoot : Boolean;


FShortCut : TShortCut;


FVisible : Boolean;