Class

TfrmDefaultEvent

Module

fDefaultEvent

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmDefaultEvent = class(TfrmBase508Form)
  pnlTop: TPanel;
  lblCaption: TLabel;
  cboEvents: TORComboBox;
  pnlBottom: TPanel;
  btnOK: TButton;
  btnCancel: TButton;
  procedure btnCancelClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure btnOKClick(Sender: TObject);
private
  OKPressed: boolean;
  FDefaultEvtName:    string;
  FPreDefaultEvtID:   string;
  FPreDefaultEvtName: string;
public
  { Public declarations }
end;

DFM Objects


frmDefaultEvent : TfrmDefaultEvent
 ├pnlTop : TPanel
 │ └lblCaption : TLabel
 ├cboEvents : TORComboBox
 ├pnlBottom : TPanel
 │ ├btnOK : TButton
 │ └btnCancel : TButton
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
btnCancel TButton Public/Published -
btnOK TButton Public/Published -
cboEvents TORComboBox Public/Published -
FDefaultEvtName UnicodeString Private -
FPreDefaultEvtID UnicodeString Private -
FPreDefaultEvtName UnicodeString Private -
lblCaption TLabel Public/Published -
OKPressed Boolean Private -
pnlBottom TPanel Public/Published -
pnlTop TPanel Public/Published -

Methods

Name Declaration Scope Comments
btnCancelClick procedure btnCancelClick(Sender: TObject); Public/Published -
btnOKClick procedure btnOKClick(Sender: TObject); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -

Referenced By (3)

Module (line) Referrer Type
fDefaultEvent (33) frmDefaultEvent Read
fDefaultEvent (43) - Read
fDefaultEvent (45) - Read