Class

TfrmPtDemo

Module

fPtDemo

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmPtDemo = class(TfrmBase508Form)
  lblFontTest: TLabel;
  memPtDemo: TRichEdit;
  pnlTop: TORAutoPanel;
  cmdNewPt: TButton;
  cmdClose: TButton;
  cmdPrint: TButton;
  dlgPrintReport: TPrintDialog;
  procedure cmdCloseClick(Sender: TObject);
  procedure cmdNewPtClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure cmdPrintClick(Sender: TObject);
private
  { Private declarations }
  FNewPt: Boolean;
public
  { Public declarations }
end;

DFM Objects


frmPtDemo : TfrmPtDemo
 ├lblFontTest : TLabel
 ├memPtDemo : TRichEdit
 ├pnlTop : TORAutoPanel
 │ ├cmdNewPt : TButton
 │ ├cmdClose : TButton
 │ └cmdPrint : TButton
 ├amgrMain : TVA508AccessibilityManager
 └dlgPrintReport : TPrintDialog

Class Hierarchy


Class Fields

Name Type Scope Comments
cmdClose TButton Public/Published -
cmdNewPt TButton Public/Published -
cmdPrint TButton Public/Published -
dlgPrintReport Simple (unknown) Public/Published -
FNewPt Boolean Private Private declarations
lblFontTest TLabel Public/Published -
memPtDemo TRichEdit Public/Published -
pnlTop TORAutoPanel Public/Published -

Methods

Name Declaration Scope Comments
cmdCloseClick procedure cmdCloseClick(Sender: TObject); Public/Published -
cmdNewPtClick procedure cmdNewPtClick(Sender: TObject); Public/Published -
cmdPrintClick procedure cmdPrintClick(Sender: TObject); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fPtDemo (41) - Read
fPtDemo (44) - Read