Class

TfrmOptionsNewList

Module

fOptionsNewList

Last Modified

7/15/2014 3:26:40 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmOptionsNewList = class(TfrmBase508Form)
  pnlBottom: TPanel;
  btnOK: TButton;
  btnCancel: TButton;
  txtNewList: TCaptionEdit;
  lblEnter: TLabel;
  lblNew: TLabel;
  Label1: TLabel;
  grpVisibility: TRadioGroup;
  procedure btnOKClick(Sender: TObject);
  procedure txtNewListKeyPress(Sender: TObject; var Key: Char);
  procedure txtNewListChange(Sender: TObject);
  procedure FormCreate(Sender: TObject);
private
  { Private declarations }
  FNewList: string;
public
  { Public declarations }
end;

DFM Objects


frmOptionsNewList : TfrmOptionsNewList
 ├lblEnter : TLabel
 ├lblNew : TLabel
 ├Label1 : TLabel
 ├pnlBottom : TPanel
 │ ├btnOK : TButton
 │ └btnCancel : TButton
 ├txtNewList : TCaptionEdit
 ├grpVisibility : TRadioGroup
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
btnCancel TButton Public/Published -
btnOK TButton Public/Published -
FNewList UnicodeString Private Private declarations
grpVisibility TRadioGroup Public/Published -
Label1 TLabel Public/Published -
lblEnter TLabel Public/Published -
lblNew TLabel Public/Published -
pnlBottom TPanel Public/Published -
txtNewList TCaptionEdit Public/Published -

Methods

Name Declaration Scope Comments
btnOKClick procedure btnOKClick(Sender: TObject); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -
txtNewListChange procedure txtNewListChange(Sender: TObject); Public/Published -
txtNewListKeyPress procedure txtNewListKeyPress(Sender: TObject; var Key: Char); Public/Published -

Referenced By (3)

Module (line) Referrer Type
fOptionsNewList (33) frmOptionsNewList Read
fOptionsNewList (44) - Read
fOptionsNewList (46) - Read