Class

TfrmLabCollectTimes

Module

fLabCollTimes

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmLabCollectTimes = class(TfrmBase508Form)
  calLabCollect: TORDateBox;
  lstLabCollTimes: TORListBox;
  cmdOK: TButton;
  cmdCancel: TButton;
  lblFutureTimes: TMemo;
  calMonth: TMonthCalendar;
  procedure calLabCollectChange(Sender: TObject);
  procedure cmdOKClick(Sender: TObject);
  procedure cmdCancelClick(Sender: TObject);
  procedure calMonthClick(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  procedure calMonthKeyDown(Sender: TObject; var Key: Word;
    Shift: TShiftState);
private
  FFutureLabCollTime: string;
public
  { Public declarations }
end;

DFM Objects


frmLabCollectTimes : TfrmLabCollectTimes
 ├lblFutureTimes : TMemo
 ├calLabCollect : TORDateBox
 ├lstLabCollTimes : TORListBox
 ├cmdOK : TButton
 ├cmdCancel : TButton
 ├calMonth : TMonthCalendar
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
calLabCollect TORDateBox Public/Published -
calMonth Simple (unknown) Public/Published -
cmdCancel TButton Public/Published -
cmdOK TButton Public/Published -
FFutureLabCollTime UnicodeString Private -
lblFutureTimes TMemo Public/Published -
lstLabCollTimes TORListBox Public/Published -

Methods

Name Declaration Scope Comments
calLabCollectChange procedure calLabCollectChange(Sender: TObject); Public/Published -
calMonthClick procedure calMonthClick(Sender: TObject); Public/Published -
calMonthKeyDown procedure calMonthKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); Public/Published -
cmdCancelClick procedure cmdCancelClick(Sender: TObject); Public/Published -
cmdOKClick procedure cmdOKClick(Sender: TObject); Public/Published -
FormCreate procedure FormCreate(Sender: TObject); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fLabCollTimes (41) - Read
fLabCollTimes (43) - Read