VistA-cprs/CPRS-Chart/fLabCollTimes.dfm

94 lines
2.0 KiB
Plaintext
Raw Normal View History

object frmLabCollectTimes: TfrmLabCollectTimes
Left = 332
Top = 310
Width = 447
Height = 197
BorderIcons = []
Caption = 'Future Lab Collect Times'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object lblFutureTimes: TMemo
Left = 211
Top = 113
Width = 129
Height = 46
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
Lines.Strings = (
'Select a date and a routine '
'lab collect time for that '
'date.')
ReadOnly = True
TabOrder = 5
end
object calLabCollect: TORDateBox
Left = 241
Top = 22
Width = 158
Height = 21
TabOrder = 0
Visible = False
OnChange = calLabCollectChange
DateOnly = True
RequireTime = False
end
object lstLabCollTimes: TORListBox
Left = 210
Top = 6
Width = 218
Height = 98
ItemHeight = 13
ParentShowHint = False
ShowHint = True
TabOrder = 1
ItemTipColor = clWindow
LongList = False
Pieces = '2'
end
object cmdOK: TButton
Left = 353
Top = 112
Width = 75
Height = 21
Caption = 'OK'
TabOrder = 2
OnClick = cmdOKClick
end
object cmdCancel: TButton
Left = 353
Top = 139
Width = 75
Height = 21
Cancel = True
Caption = 'Cancel'
TabOrder = 3
OnClick = cmdCancelClick
end
object calMonth: TMonthCalendar
Left = 8
Top = 5
Width = 190
Height = 153
CalColors.TitleBackColor = clBtnFace
CalColors.TitleTextColor = clBtnText
CalColors.MonthBackColor = clWindow
CalColors.TrailingTextColor = clGrayText
Date = 36507.6194967361
ShowTodayCircle = False
TabOrder = 4
TabStop = True
OnClick = calMonthClick
OnKeyDown = calMonthKeyDown
end
end