Class

TfrmODLabImmedColl

Module

fODLabImmedColl

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmODLabImmedColl = class(TfrmBase508Form)
  memImmedCollect: TCaptionMemo;
  calImmedCollect: TORDateBox;
  cmdOK: TORAlignButton;
  cmdCancel: TORAlignButton;
  pnlBase: TORAutoPanel;
  lblImmedColl: TOROffsetLabel;
  procedure cmdCancelClick(Sender: TObject);
  procedure cmdOKClick(Sender: TObject);
  procedure FormShow(Sender: TObject);
  procedure calImmedCollectKeyUp(Sender: TObject; var Key: Word;
    Shift: TShiftState);
private
  FCollTime: string;
  { Private declarations }
public
  { Public declarations }
end;

DFM Objects


frmODLabImmedColl : TfrmODLabImmedColl
 ├pnlBase : TORAutoPanel
 │ ├lblImmedColl : TOROffsetLabel
 │ ├memImmedCollect : TCaptionMemo
 │ ├calImmedCollect : TORDateBox
 │ ├cmdOK : TORAlignButton
 │ └cmdCancel : TORAlignButton
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
calImmedCollect TORDateBox Public/Published -
cmdCancel TORAlignButton Public/Published -
cmdOK TORAlignButton Public/Published -
FCollTime UnicodeString Private -
lblImmedColl TOROffsetLabel Public/Published -
memImmedCollect TCaptionMemo Public/Published -
pnlBase TORAutoPanel Public/Published -

Methods

Name Declaration Scope Comments
calImmedCollectKeyUp procedure calImmedCollectKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
cmdCancelClick procedure cmdCancelClick(Sender: TObject); Public/Published -
cmdOKClick procedure cmdOKClick(Sender: TObject); Public/Published -
FormShow procedure FormShow(Sender: TObject); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fODLabImmedColl (46) - Read
fODLabImmedColl (48) - Read