Class TSystemMenu97Options (unit Menus97)

Inherits from

TPersistent

Constructors


constructor Create(Command: Integer);

else we call the old DefaultProc.


Functions

destructor Destroy;


procedure MenuItemFromCommand(MenuHandle: THandle; aOwner: TCustomSystemMenus97);


Properties

property Caption : String


property ImageIndex : Integer


property Visible : TSystemMenu97ItemState


property MenuItem : TMenuItem


Events

Variables

FCaption : String;


FCommand : Integer;


FImageIndex : Integer;


FMenuItem : TMenuItem;


FVisible : TSystemMenu97ItemState;



Constructors


constructor Create(Command: Integer);

else we call the old DefaultProc.


Functions


destructor Destroy;


procedure MenuItemFromCommand(MenuHandle: THandle; aOwner: TCustomSystemMenus97);


Properties


property Caption : String


property ImageIndex : Integer


property Visible : TSystemMenu97ItemState


property MenuItem : TMenuItem


Events


Variables


FCaption : String;


FCommand : Integer;


FImageIndex : Integer;


FMenuItem : TMenuItem;


FVisible : TSystemMenu97ItemState;