Class TmoHotkeyLister (unit hklister)

Inherits from

TTreeView

THotkeyLister beta version 1 (11/4/96) (c) 1996, by Maggie Owens mmowens@panix.com http://www.panix.com/~mmowens This componennt is provided free, without warranty or guarantee of any kind -- use it at your own risk. The author takes no responsibility for any problems it may cause.

Constructors


constructor Create(AOwner: TComponent);

TmoHotkeyLister


Functions

destructor Destroy;


procedure Execute;


procedure AddMenuItem(const ttn: TTreeNode; const mi1: TMenuItem);


function DelAnd(st1: String): String;

no sub-menu items were added: delete the parent.

Properties

property DoFullExpand : Boolean

Published declarations

property MenuForm : TForm

Public declarations

Events

Variables

FDoFullExpand : Boolean;


FMenuForm : TForm;

Protected declarations

stl : TStringList;



Constructors


constructor Create(AOwner: TComponent);

TmoHotkeyLister


Functions


destructor Destroy;


procedure Execute;


procedure AddMenuItem(const ttn: TTreeNode; const mi1: TMenuItem);


function DelAnd(st1: String): String;

no sub-menu items were added: delete the parent.


Properties


property DoFullExpand : Boolean

Published declarations


property MenuForm : TForm

Public declarations


Events


Variables


FDoFullExpand : Boolean;


FMenuForm : TForm;

Protected declarations


stl : TStringList;