Class

TfrmLabPrint

Module

fLabPrint

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmLabPrint = class(TfrmBase508Form)
  lblLabTitle: 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 cboDeviceNeedData(Sender: TObject; const StartFrom: String;
    Direction, InsertAt: Integer);
  procedure cmdOKClick(Sender: TObject);
  procedure cmdCancelClick(Sender: TObject);
  procedure FindVType;
private
  { Private declarations }
  fReports: String;
  FDaysBack: Integer;
  FReportText: TRichEdit;
  procedure DisplaySelectDevice;
public
  { Public declarations }
end;

DFM Objects


frmLabPrint : TfrmLabPrint
 ├lblPrintTo : TLabel
 ├lblLabTitle : 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 -
FDaysBack Integer Private -
FReports UnicodeString Private Private declarations
FReportText TRichEdit Private -
grpDevice TGroupBox Public/Published -
lblLabTitle TMemo Public/Published -
lblLength TLabel Public/Published -
lblMargin TLabel Public/Published -
lblPrintTo TLabel 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
fLabPrint (41) frmLabPrint Read
fLabPrint (70) - Read
fLabPrint (73) - Read