Class

TfrmReportPrt

Module

fReportsPrint

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmReportPrt = class(TfrmBase508Form)
  lblReportsTitle: TMemo;
  lblPrintTo: TLabel;
  grpDevice: TGroupBox;
  lblMargin: TLabel;
  lblLength: TLabel;
  txtRightMargin: TMaskEdit;
  txtPageLength: TMaskEdit;
  cboDevice: TORComboBox;
  cmdOK: TButton;
  cmdCancel: TButton;
  dlgWinPrinter: TPrintDialog;
  chkDefault: TCheckBox;
  procedure cboDeviceChange(Sender: TObject);
  procedure cmdOKClick(Sender: TObject);
  procedure cmdCancelClick(Sender: TObject);
  procedure cboDeviceNeedData(Sender: TObject; const StartFrom: String;
    Direction, InsertAt: Integer);
  procedure FindVType;

private
  { Private declarations }
  fReports: string;
  FReportText: TRichEdit;
  procedure DisplaySelectDevice;

public
  { Public declarations }
end;

DFM Objects


frmReportPrt : TfrmReportPrt
 ├lblPrintTo : TLabel
 ├lblReportsTitle : TMemo
 ├grpDevice : TGroupBox
 │ ├lblMargin : TLabel
 │ ├lblLength : TLabel
 │ ├txtRightMargin : TMaskEdit
 │ ├txtPageLength : TMaskEdit
 │ └cboDevice : TORComboBox
 ├cmdOK : TButton
 ├cmdCancel : TButton
 ├chkDefault : TCheckBox
 ├amgrMain : TVA508AccessibilityManager
 └dlgWinPrinter : TPrintDialog

Class Hierarchy


Class Fields

Name Type Scope Comments
cboDevice TORComboBox Public/Published -
chkDefault TCheckBox Public/Published -
cmdCancel TButton Public/Published -
cmdOK TButton Public/Published -
dlgWinPrinter Simple (unknown) Public/Published -
FReports UnicodeString Private Private declarations
FReportText TRichEdit Private -
grpDevice TGroupBox Public/Published -
lblLength TLabel Public/Published -
lblMargin TLabel Public/Published -
lblPrintTo TLabel Public/Published -
lblReportsTitle TMemo Public/Published -
txtPageLength Simple (unknown) Public/Published -
txtRightMargin Simple (unknown) Public/Published -

Methods

Name Declaration Scope Comments
cboDeviceChange procedure cboDeviceChange(Sender: TObject); Public/Published -
cboDeviceNeedData procedure cboDeviceNeedData(Sender: TObject; const StartFrom: String; Direction, InsertAt: Integer); Public/Published -
cmdCancelClick procedure cmdCancelClick(Sender: TObject); Public/Published -
cmdOKClick procedure cmdOKClick(Sender: TObject); Public/Published -
DisplaySelectDevice procedure DisplaySelectDevice; Private -
FindVType procedure FindVType; Public/Published -

Referenced By (3)

Module (line) Referrer Type
fReportsPrint (42) frmReportPrt Read
fReportsPrint (73) - Read
fReportsPrint (76) - Read