Class

TfrmPtSens

Module

fPtSens

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmPtSens = class(TfrmBase508Form)
  imgWarning: TImage;
  memWarning: TMemo;
  cmdYes: TButton;
  cmdNo: TButton;
  lblContinue: TStaticText;
  procedure FormCreate(Sender: TObject);
  procedure cmdYesClick(Sender: TObject);
  procedure cmdNoClick(Sender: TObject);
private
  FContinue: Boolean;
public
  { Public declarations }
end;

DFM Objects


frmPtSens : TfrmPtSens
 ├imgWarning : TImage
 ├lblContinue : TStaticText
 ├memWarning : TMemo
 ├cmdYes : TButton
 ├cmdNo : TButton
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
cmdNo TButton Public/Published -
cmdYes TButton Public/Published -
FContinue Boolean Private -
imgWarning TImage Public/Published -
lblContinue TStaticText Public/Published -
memWarning TMemo Public/Published -

Methods

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

Referenced By (2)

Module (line) Referrer Type
fPtSens (33) - Read
fPtSens (35) - Read