MSEgui documentation

Class tmenuitem

Description
Hierarchy
Fields
Methods
Properties

Unit

msemenus

Declaration

type tmenuitem = class(teventpersistent, iactionlink, imenuitem, iimagelistinfo, iassistiveclientmenu)

Description

No description available, ancestor teventpersistent description follows
No description available, ancestor tlinkedpersistent description follows
No description available, ancestor tnullinterfacedpersistent description follows
No description available, ancestor tvirtualpersistent description follows

Hierarchy

Overview

Fields

Protected finfo: actioninfoty;
Protected fowner: tcustommenu;
Protected fsubmenu: tmenuitems;
Protected ffont: tmenufont;
Protected ffontactive: tmenufontactive;
Protected factiveitem: int32;

Methods

Protected function getactiveitem(out aitem: tmenuitem): boolean;
Protected procedure updatecaption;
Protected procedure defineproperties(filer: tfiler); override;
Protected procedure befexec;
Protected function doexec: boolean;
Protected function getiassistiveclient(): iassistiveclientmenu virtual;
Protected function getassistiveparent(): iassistiveclient;
Protected function getassistivewidget(): tobject;
Protected function getassistivename(): msestring; virtual;
Protected function getassistivecaption(): msestring; virtual;
Protected function getassistivetext(): msestring; virtual;
Protected function getassistivecaretindex(): int32; virtual;
Protected function getassistivehint(): msestring; virtual;
Protected function getassistiveflags(): assistiveflagsty; virtual;
Protected function getifidatalinkintf(): iifidatalink; virtual;
Protected function getassistiveselfcaption(): msestring;
Protected function getassistiveselfname(): msestring;
Protected function getassistiveselfhint(): msestring;
Protected function getactioninfopo: pactioninfoty;
Protected function loading: boolean;
Protected function shortcutseparator: msechar;
Protected procedure calccaptiontext(var ainfo: actioninfoty);
Protected procedure objectevent(const sender: tobject; const event: objecteventty); override;
Protected procedure receiveevent(const event: tobjectevent); override;
Protected function internalexecute(async: boolean): boolean;
Protected function canshowhint: boolean;
Public constructor create(const parentmenu: tmenuitem = nil; const aowner: tcustommenu = nil); reintroduce;
Public destructor destroy; override;
Public procedure assign(source: tpersistent); override;
Public procedure beginload;
Public procedure endload;
Public procedure doupdate;
Public procedure updatehotkeys();
Public procedure doshortcut(var info: keyeventinfoty);
Public function count: integer;
Public function hasvisibleitem: boolean;
Public function parentmenu: tmenuitem;
Public function actualcolor: colorty;
Public function actualcoloractive: colorty;
Public function actualcolorglyph: colorty;
Public function actualcolorglyphactive: colorty;
Public function execute: boolean;
Public function asyncexecute: boolean;
Public function canactivate: boolean;
Public function canshow: boolean;
Public procedure createfont;
Public procedure createfontactive;
Public function itembyname(const name: string): tmenuitem;
Public function itembynames(const names: array of string): tmenuitem;
Public procedure deleteitembynames(const names: array of string);
Public function index: integer;

Properties

Public property owner: tcustommenu read fowner;
Public property onchange: menuitemeventty read fonchange write fonchange;
Public property items[constindex:integer]: tmenuitem read getitems write setitems;
Public property checkedtag: integer read getcheckedtag write setcheckedtag;
Public property checked: boolean read getchecked write setchecked;
Public property enabled: boolean read getenabled write setenabled;
Public property visible: boolean read getvisible write setvisible;
Public property tagpo: pointer read finfo.tagpo write finfo.tagpo;
Public property tagpointer: pointer read finfo.tagpo write finfo.tagpo; deprecated 'Use tagpo instead';
Public property shortcuts: shortcutarty read finfo.shortcut write setshortcuts;
Public property shortcuts1: shortcutarty read finfo.shortcut1 write setshortcuts1;
Published property action: tcustomaction read finfo.action write setaction;
Published property submenu: tmenuitems read getsubmenu write setsubmenu;
Published property caption: captionty read finfo.captiontext write setcaption stored iscaptionstored;
Published property hint: msestring read finfo.hint write sethint stored ishintstored;
Published property name: string read fname write fname;
Published property state: actionstatesty read finfo.state write setstate stored isstatestored default [];
Published property options: menuactionoptionsty read finfo.options write setoptions default defaultmenuactoptions;
Published property shortcut: shortcutty read getshortcut write setshortcut stored false default 0;
Published property shortcut1: shortcutty read getshortcut1 write setshortcut1 stored false default 0;
Published property tag: integer read finfo.tag write settag stored istagstored default 0;
Published property group: integer read finfo.group write setgroup stored isgroupstored default 0;
Published property imagelist: timagelist read getimagelist write setimagelist stored isimageliststored;
Published property imagenr: imagenrty read finfo.imagenr write setimagenr stored isimagenrstored default -1;
Published property imagenrdisabled: imagenrty read finfo.imagenrdisabled write setimagenrdisabled stored isimagenrdisabledstored default -2;
Published property color: colorty read finfo.color write setcolor stored iscolorstored default cl_default;
Published property coloractive: colorty read fcoloractive write setcoloractive default cl_default;
Published property colorglyph: colorty read finfo.colorglyph write setcolorglyph stored iscolorglyphstored default cl_default;
Published property colorglyphactive: colorty read fcolorglyphactive write setcolorglyphactive default cl_default;
Published property font: tmenufont read getfont write setfont stored isfontstored;
Published property fontactive: tmenufontactive read getfontactive write setfontactive stored isfontactivestored;
Published property onexecute: notifyeventty read finfo.onexecute write setonexecute stored isonexecutestored;
Published property onbeforeexecute: accepteventty read finfo.onbeforeexecute write setonbeforeexecute stored isonbeforeexecutestored;
Published property onafterexecute: notifyeventty read finfo.onafterexecute write setonafterexecute stored isonafterexecutestored;

Description

Fields

Protected finfo: actioninfoty;
 
Protected fowner: tcustommenu;
 
Protected fsubmenu: tmenuitems;
 
Protected ffont: tmenufont;
 
Protected ffontactive: tmenufontactive;
 
Protected factiveitem: int32;
 

Methods

Protected function getactiveitem(out aitem: tmenuitem): boolean;
 
Protected procedure updatecaption;
 
Protected procedure defineproperties(filer: tfiler); override;
 
Protected procedure befexec;
 
Protected function doexec: boolean;
 
Protected function getiassistiveclient(): iassistiveclientmenu virtual;
 
Protected function getassistiveparent(): iassistiveclient;
 
Protected function getassistivewidget(): tobject;
 
Protected function getassistivename(): msestring; virtual;
 
Protected function getassistivecaption(): msestring; virtual;
 
Protected function getassistivetext(): msestring; virtual;
 
Protected function getassistivecaretindex(): int32; virtual;
 
Protected function getassistivehint(): msestring; virtual;
 
Protected function getassistiveflags(): assistiveflagsty; virtual;
 
Protected function getifidatalinkintf(): iifidatalink; virtual;
 
Protected function getassistiveselfcaption(): msestring;
 
Protected function getassistiveselfname(): msestring;
 
Protected function getassistiveselfhint(): msestring;
 
Protected function getactioninfopo: pactioninfoty;
 
Protected function loading: boolean;
 
Protected function shortcutseparator: msechar;
 
Protected procedure calccaptiontext(var ainfo: actioninfoty);
 
Protected procedure objectevent(const sender: tobject; const event: objecteventty); override;
 
Protected procedure receiveevent(const event: tobjectevent); override;
 
Protected function internalexecute(async: boolean): boolean;
 
Protected function canshowhint: boolean;
 
Public constructor create(const parentmenu: tmenuitem = nil; const aowner: tcustommenu = nil); reintroduce;
 
Public destructor destroy; override;
 
Public procedure assign(source: tpersistent); override;
 
Public procedure beginload;
 
Public procedure endload;
 
Public procedure doupdate;
 
Public procedure updatehotkeys();
 
Public procedure doshortcut(var info: keyeventinfoty);
 
Public function count: integer;
 
Public function hasvisibleitem: boolean;
 
Public function parentmenu: tmenuitem;
 
Public function actualcolor: colorty;
 
Public function actualcoloractive: colorty;
 
Public function actualcolorglyph: colorty;
 
Public function actualcolorglyphactive: colorty;
 
Public function execute: boolean;
 
Public function asyncexecute: boolean;
 
Public function canactivate: boolean;
 
Public function canshow: boolean;
 
Public procedure createfont;
 
Public procedure createfontactive;
 
Public function itembyname(const name: string): tmenuitem;
 
Public function itembynames(const names: array of string): tmenuitem;
 
Public procedure deleteitembynames(const names: array of string);
 
Public function index: integer;
 

Properties

Public property owner: tcustommenu read fowner;
 
Public property onchange: menuitemeventty read fonchange write fonchange;
 
Public property items[constindex:integer]: tmenuitem read getitems write setitems;
 
Public property checkedtag: integer read getcheckedtag write setcheckedtag;
 
Public property checked: boolean read getchecked write setchecked;
 
Public property enabled: boolean read getenabled write setenabled;
 
Public property visible: boolean read getvisible write setvisible;
 
Public property tagpo: pointer read finfo.tagpo write finfo.tagpo;
 
Public property tagpointer: pointer read finfo.tagpo write finfo.tagpo; deprecated 'Use tagpo instead';

Warning: this symbol is deprecated: Use tagpo instead

 
Public property shortcuts: shortcutarty read finfo.shortcut write setshortcuts;
 
Public property shortcuts1: shortcutarty read finfo.shortcut1 write setshortcuts1;
 
Published property action: tcustomaction read finfo.action write setaction;
 
Published property submenu: tmenuitems read getsubmenu write setsubmenu;
 
Published property caption: captionty read finfo.captiontext write setcaption stored iscaptionstored;
 
Published property hint: msestring read finfo.hint write sethint stored ishintstored;
 
Published property name: string read fname write fname;
 
Published property state: actionstatesty read finfo.state write setstate stored isstatestored default [];
 
Published property options: menuactionoptionsty read finfo.options write setoptions default defaultmenuactoptions;
 
Published property shortcut: shortcutty read getshortcut write setshortcut stored false default 0;
 
Published property shortcut1: shortcutty read getshortcut1 write setshortcut1 stored false default 0;
 
Published property tag: integer read finfo.tag write settag stored istagstored default 0;
 
Published property group: integer read finfo.group write setgroup stored isgroupstored default 0;
 
Published property imagelist: timagelist read getimagelist write setimagelist stored isimageliststored;
 
Published property imagenr: imagenrty read finfo.imagenr write setimagenr stored isimagenrstored default -1;
 
Published property imagenrdisabled: imagenrty read finfo.imagenrdisabled write setimagenrdisabled stored isimagenrdisabledstored default -2;
 
Published property color: colorty read finfo.color write setcolor stored iscolorstored default cl_default;
 
Published property coloractive: colorty read fcoloractive write setcoloractive default cl_default;
 
Published property colorglyph: colorty read finfo.colorglyph write setcolorglyph stored iscolorglyphstored default cl_default;
 
Published property colorglyphactive: colorty read fcolorglyphactive write setcolorglyphactive default cl_default;
 
Published property font: tmenufont read getfont write setfont stored isfontstored;
 
Published property fontactive: tmenufontactive read getfontactive write setfontactive stored isfontactivestored;
 
Published property onexecute: notifyeventty read finfo.onexecute write setonexecute stored isonexecutestored;
 
Published property onbeforeexecute: accepteventty read finfo.onbeforeexecute write setonbeforeexecute stored isonbeforeexecutestored;
 
Published property onafterexecute: notifyeventty read finfo.onafterexecute write setonafterexecute stored isonafterexecutestored;
 
Generated by PasDoc 0.16.0.