Class

TfrmODMedFA

Module

fODMedFA

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Inherits from

TfrmAutoSz

Declaration


TfrmODMedFA = class(TfrmAutoSz)
  Label1: TLabel;
  lstFormAlt: TORListBox;
  Label2: TStaticText;
  cmdYes: TButton;
  cmdNo: TButton;
  procedure lstFormAltClick(Sender: TObject);
  procedure cmdYesClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure cmdNoClick(Sender: TObject);
private
  { Private declarations }
  FSelected: string;
public
  { Public declarations }
end;

DFM Objects


frmODMedFA : TfrmODMedFA
 ├Label1 : TLabel
 ├Label2 : TStaticText
 ├lstFormAlt : TORListBox
 ├cmdYes : TButton
 ├cmdNo : TButton
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
cmdNo TButton Public/Published -
cmdYes TButton Public/Published -
FSelected UnicodeString Private Private declarations
Label1 TLabel Public/Published -
Label2 TStaticText Public/Published -
lstFormAlt TORListBox 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 -
lstFormAltClick procedure lstFormAltClick(Sender: TObject); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fODMedFA (45) - Read
fODMedFA (57) - Read