1 | object frmLabCollectTimes: TfrmLabCollectTimes
|
---|
2 | Left = 332
|
---|
3 | Top = 310
|
---|
4 | Width = 447
|
---|
5 | Height = 197
|
---|
6 | BorderIcons = []
|
---|
7 | Caption = 'Future Lab Collect Times'
|
---|
8 | Color = clBtnFace
|
---|
9 | Font.Charset = DEFAULT_CHARSET
|
---|
10 | Font.Color = clWindowText
|
---|
11 | Font.Height = -11
|
---|
12 | Font.Name = 'MS Sans Serif'
|
---|
13 | Font.Style = []
|
---|
14 | OldCreateOrder = False
|
---|
15 | Position = poScreenCenter
|
---|
16 | OnCreate = FormCreate
|
---|
17 | PixelsPerInch = 96
|
---|
18 | TextHeight = 13
|
---|
19 | object lblFutureTimes: TMemo
|
---|
20 | Left = 211
|
---|
21 | Top = 113
|
---|
22 | Width = 129
|
---|
23 | Height = 46
|
---|
24 | TabStop = False
|
---|
25 | BorderStyle = bsNone
|
---|
26 | Color = clBtnFace
|
---|
27 | Lines.Strings = (
|
---|
28 | 'Select a date and a routine '
|
---|
29 | 'lab collect time for that '
|
---|
30 | 'date.')
|
---|
31 | ReadOnly = True
|
---|
32 | TabOrder = 5
|
---|
33 | end
|
---|
34 | object calLabCollect: TORDateBox
|
---|
35 | Left = 241
|
---|
36 | Top = 22
|
---|
37 | Width = 158
|
---|
38 | Height = 21
|
---|
39 | TabOrder = 0
|
---|
40 | Visible = False
|
---|
41 | OnChange = calLabCollectChange
|
---|
42 | DateOnly = True
|
---|
43 | RequireTime = False
|
---|
44 | end
|
---|
45 | object lstLabCollTimes: TORListBox
|
---|
46 | Left = 210
|
---|
47 | Top = 6
|
---|
48 | Width = 218
|
---|
49 | Height = 98
|
---|
50 | ItemHeight = 13
|
---|
51 | ParentShowHint = False
|
---|
52 | ShowHint = True
|
---|
53 | TabOrder = 1
|
---|
54 | ItemTipColor = clWindow
|
---|
55 | LongList = False
|
---|
56 | Pieces = '2'
|
---|
57 | end
|
---|
58 | object cmdOK: TButton
|
---|
59 | Left = 353
|
---|
60 | Top = 112
|
---|
61 | Width = 75
|
---|
62 | Height = 21
|
---|
63 | Caption = 'OK'
|
---|
64 | TabOrder = 2
|
---|
65 | OnClick = cmdOKClick
|
---|
66 | end
|
---|
67 | object cmdCancel: TButton
|
---|
68 | Left = 353
|
---|
69 | Top = 139
|
---|
70 | Width = 75
|
---|
71 | Height = 21
|
---|
72 | Cancel = True
|
---|
73 | Caption = 'Cancel'
|
---|
74 | TabOrder = 3
|
---|
75 | OnClick = cmdCancelClick
|
---|
76 | end
|
---|
77 | object calMonth: TMonthCalendar
|
---|
78 | Left = 8
|
---|
79 | Top = 5
|
---|
80 | Width = 190
|
---|
81 | Height = 153
|
---|
82 | CalColors.TitleBackColor = clBtnFace
|
---|
83 | CalColors.TitleTextColor = clBtnText
|
---|
84 | CalColors.MonthBackColor = clWindow
|
---|
85 | CalColors.TrailingTextColor = clGrayText
|
---|
86 | Date = 36507.678874432870000000
|
---|
87 | ShowTodayCircle = False
|
---|
88 | TabOrder = 4
|
---|
89 | TabStop = True
|
---|
90 | OnClick = calMonthClick
|
---|
91 | OnKeyDown = calMonthKeyDown
|
---|
92 | end
|
---|
93 | object DKLanguageController1: TDKLanguageController
|
---|
94 | Left = 208
|
---|
95 | Top = 128
|
---|
96 | LangData = {
|
---|
97 | 120066726D4C6162436F6C6C65637454696D6573010100000001000000070043
|
---|
98 | 617074696F6E01060000000E006C626C46757475726554696D65730101000000
|
---|
99 | 0200000005004C696E6573000D0063616C4C6162436F6C6C65637400000F006C
|
---|
100 | 73744C6162436F6C6C54696D657300000500636D644F4B010100000003000000
|
---|
101 | 070043617074696F6E000900636D6443616E63656C0101000000040000000700
|
---|
102 | 43617074696F6E00080063616C4D6F6E74680000}
|
---|
103 | end
|
---|
104 | end
|
---|