Class TInputBoxMenu (unit Ef_Input)

Inherits from

TPopupMenu

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


procedure RunTimeLoaded;


procedure ActivatePopup(Sender:TObject);


procedure AddToMenu(AMenuItem:TShowMenu; AddIt:Boolean);


function GetItemCaption(AMenuItem:TShowMenu):string;


function GetItemHint(AMenuItem:TShowMenu):string;


function GetItemName(AMenuItem:TShowMenu):TComponentName;


function GetItemPos(AMenuItem:TShowMenu):Integer;


procedure Loaded;


procedure MakeMenu;

removes itself from the parent list

procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure OnMenuItemClick(Sender:TObject);


procedure SetName(const NewName: TComponentName);


procedure SetShowInMenu(NewShowInMenu:TShowMenuSet);


Properties

property ShowInMenu : TShowMenuSet


property MenuItems : TMenuItems


Events

Variables

FCheckPointer : Boolean;


FMenuItems : TMenuItems;


FOldOnPopup : TNotifyEvent;


FShowInMenu : TShowMenuSet;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


procedure RunTimeLoaded;


procedure ActivatePopup(Sender:TObject);


procedure AddToMenu(AMenuItem:TShowMenu; AddIt:Boolean);


function GetItemCaption(AMenuItem:TShowMenu):string;


function GetItemHint(AMenuItem:TShowMenu):string;


function GetItemName(AMenuItem:TShowMenu):TComponentName;


function GetItemPos(AMenuItem:TShowMenu):Integer;


procedure Loaded;


procedure MakeMenu;

removes itself from the parent list


procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure OnMenuItemClick(Sender:TObject);


procedure SetName(const NewName: TComponentName);


procedure SetShowInMenu(NewShowInMenu:TShowMenuSet);


Properties


property ShowInMenu : TShowMenuSet


property MenuItems : TMenuItems


Events


Variables


FCheckPointer : Boolean;


FMenuItems : TMenuItems;


FOldOnPopup : TNotifyEvent;


FShowInMenu : TShowMenuSet;