Class

TfrmOMVerify

Module

fOMVerify

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Inherits from

TfrmAutoSz

Declaration


TfrmOMVerify = class(TfrmAutoSz)
  cmdAccept: TButton;
  cmdEdit: TButton;
  cmdCancel: TButton;
  memText: TRichEdit;
  VA508ComponentAccessibility1: TVA508ComponentAccessibility;
  procedure cmdAcceptClick(Sender: TObject);
  procedure cmdEditClick(Sender: TObject);
  procedure cmdCancelClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure FormClose(Sender: TObject; var Action: TCloseAction);
  procedure memTextKeyUp(Sender: TObject; var Key: Word;
    Shift: TShiftState);
  procedure FormDestroy(Sender: TObject);
  procedure VA508ComponentAccessibility1StateQuery(Sender: TObject;
    var Text: string);
  procedure FormShow(Sender: TObject);
  procedure memTextKeyDown(Sender: TObject; var Key: Word;
    Shift: TShiftState);
private
  FLevel: Integer;
end;

DFM Objects


frmOMVerify : TfrmOMVerify
 ├cmdAccept : TButton
 ├cmdEdit : TButton
 ├cmdCancel : TButton
 ├memText : TRichEdit
 ├amgrMain : TVA508AccessibilityManager
 └VA508ComponentAccessibility1 : TVA508ComponentAccessibility

Class Hierarchy


Class Fields

Name Type Scope Comments
cmdAccept TButton Public/Published -
cmdCancel TButton Public/Published -
cmdEdit TButton Public/Published -
FLevel Integer Private -
memText TRichEdit Public/Published -
VA508ComponentAccessibility1 TVA508ComponentAccessibility Public/Published -

Methods

Name Declaration Scope Comments
cmdAcceptClick procedure cmdAcceptClick(Sender: TObject); Public/Published -
cmdCancelClick procedure cmdCancelClick(Sender: TObject); Public/Published -
cmdEditClick procedure cmdEditClick(Sender: TObject); Public/Published -
FormClose procedure FormClose(Sender: TObject; var Action: TCloseAction); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -
FormDestroy procedure FormDestroy(Sender: TObject); Public/Published -
FormShow procedure FormShow(Sender: TObject); Public/Published -
memTextKeyDown procedure memTextKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
memTextKeyUp procedure memTextKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
VA508ComponentAccessibility1StateQuery procedure VA508ComponentAccessibility1StateQuery(Sender: TObject; var Text: string); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fOMVerify (36) frmOMVerify Read
fOMVerify (78) - Read