| Class THistMenu (unit HistMenu) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Add(Caption:String; Tag: LongInt);
procedure RegRestore;
procedure RegSave;
procedure InsertSeparator;
procedure OnItemClick(Sender: TObject);
procedure SetAddSeparator(Value: boolean);
procedure SetMaxHistory(Value: integer);
procedure SetMenuItem(Value: TMenuItem);| Properties |
property AddSeparator : boolean
property BaseKey : String
property ItemCount : integer
property MaxHistory : integer
property MenuItem : TMenuItem| Events |
event OnClick : THistMenuEvent| Variables |
FAddSeparator : boolean;
FBaseKey : String;
FFirstIndex : integer;
FItemCount : integer;
FMaxHistory : integer;
FMenuItem : TMenuItem;
FOnClick : THistMenuEvent;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
procedure Add(Caption:String; Tag: LongInt);
procedure RegRestore;
procedure RegSave;
procedure InsertSeparator;
procedure OnItemClick(Sender: TObject);
procedure SetAddSeparator(Value: boolean);
procedure SetMaxHistory(Value: integer);
procedure SetMenuItem(Value: TMenuItem);| Properties |
property AddSeparator : boolean
property BaseKey : String
property ItemCount : integer
property MaxHistory : integer
property MenuItem : TMenuItemPublished declarations
| Events |
event OnClick : THistMenuEvent| Variables |
FAddSeparator : boolean;
FBaseKey : String;
FFirstIndex : integer;
FItemCount : integer;
FMaxHistory : integer;
FMenuItem : TMenuItem;Private declarations
FOnClick : THistMenuEvent;