Class

TfrmOptionsSurrogate

Module

fOptionsSurrogate

Last Modified

7/15/2014 3:26:40 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmOptionsSurrogate = class(TfrmBase508Form)
  lblSurrogate: TLabel;
  cboSurrogate: TORComboBox;
  btnSurrogateDateRange: TButton;
  dlgSurrogateDateRange: TORDateRangeDlg;
  lblSurrogateText: TStaticText;
  btnRemove: TButton;
  lblStart: TStaticText;
  lblStop: TStaticText;
  pnlBottom: TPanel;
  bvlBottom: TBevel;
  btnCancel: TButton;
  btnOK: TButton;
  procedure FormShow(Sender: TObject);
  procedure btnSurrogateDateRangeClick(Sender: TObject);
  procedure cboSurrogateNeedData(Sender: TObject;
    const StartFrom: String; Direction, InsertAt: Integer);
  procedure btnOKClick(Sender: TObject);
  procedure btnRemoveClick(Sender: TObject);
  procedure cboSurrogateChange(Sender: TObject);
  procedure cboSurrogateKeyDown(Sender: TObject; var Key: Word;
    Shift: TShiftState);
private
  { Private declarations }
  procedure LabelInfo;
public
  { Public declarations }
end;

DFM Objects


frmOptionsSurrogate : TfrmOptionsSurrogate
 ├lblSurrogate : TLabel
 ├lblSurrogateText : TStaticText
 ├lblStart : TStaticText
 ├lblStop : TStaticText
 ├cboSurrogate : TORComboBox
 ├btnSurrogateDateRange : TButton
 ├btnRemove : TButton
 ├pnlBottom : TPanel
 │ ├bvlBottom : TBevel
 │ ├btnCancel : TButton
 │ └btnOK : TButton
 ├amgrMain : TVA508AccessibilityManager
 └dlgSurrogateDateRange : TORDateRangeDlg

Class Hierarchy


Class Fields

Name Type Scope Comments
btnCancel TButton Public/Published -
btnOK TButton Public/Published -
btnRemove TButton Public/Published -
btnSurrogateDateRange TButton Public/Published -
bvlBottom TBevel Public/Published -
cboSurrogate TORComboBox Public/Published -
dlgSurrogateDateRange TORDateRangeDlg Public/Published -
lblStart TStaticText Public/Published -
lblStop TStaticText Public/Published -
lblSurrogate TLabel Public/Published -
lblSurrogateText TStaticText Public/Published -
pnlBottom TPanel Public/Published -

Methods

Name Declaration Scope Comments
btnOKClick procedure btnOKClick(Sender: TObject); Public/Published -
btnRemoveClick procedure btnRemoveClick(Sender: TObject); Public/Published -
btnSurrogateDateRangeClick procedure btnSurrogateDateRangeClick(Sender: TObject); Public/Published -
cboSurrogateChange procedure cboSurrogateChange(Sender: TObject); Public/Published -
cboSurrogateKeyDown procedure cboSurrogateKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
cboSurrogateNeedData procedure cboSurrogateNeedData(Sender: TObject; const StartFrom: String; Direction, InsertAt: Integer); Public/Published -
FormShow procedure FormShow(Sender: TObject); Public/Published -
LabelInfo procedure LabelInfo; Private Private declarations

Referenced By (3)

Module (line) Referrer Type
fOptionsSurrogate (41) frmOptionsSurrogate Read
fOptionsSurrogate (57) - Read
fOptionsSurrogate (59) - Read