source: cprs/branches/tmg-cprs/CPRS-Chart/fLabTestGroups.dfm@ 1594

Last change on this file since 1594 was 453, checked in by Kevin Toppenberg, 17 years ago

Initial upload of TMG-CPRS 1.0.26.69
File size: 9.5 KB
RevLine 
[453]1object frmLabTestGroups: TfrmLabTestGroups
2 Left = 337
3 Top = 202
4 Width = 465
5 Height = 461
6 Caption = 'Select Lab Tests'
7 Color = clBtnFace
8 Font.Charset = DEFAULT_CHARSET
9 Font.Color = clWindowText
10 Font.Height = -11
11 Font.Name = 'MS Sans Serif'
12 Font.Style = []
13 OldCreateOrder = True
14 Position = poScreenCenter
15 OnCreate = FormCreate
16 PixelsPerInch = 96
17 TextHeight = 13
18 object pnlLabTestGroups: TORAutoPanel
19 Left = 0
20 Top = 0
21 Width = 457
22 Height = 427
23 Align = alClient
24 Caption = 'Specimen'
25 TabOrder = 0
26 object bvlTestGroups: TBevel
27 Left = 1
28 Top = 1
29 Width = 455
30 Height = 120
31 Align = alTop
32 end
33 object lblTests: TLabel
34 Left = 10
35 Top = 124
36 Width = 79
37 Height = 13
38 Caption = 'Laboratory Tests'
39 end
40 object lblList: TLabel
41 Left = 284
42 Top = 144
43 Width = 100
44 Height = 13
45 Caption = 'Tests to be displayed'
46 end
47 object lblSpecimen: TLabel
48 Left = 12
49 Top = 383
50 Width = 47
51 Height = 13
52 Caption = 'Specimen'
53 end
54 object lblTestGroups: TLabel
55 Left = 10
56 Top = 38
57 Width = 58
58 Height = 13
59 Caption = 'Test Groups'
60 end
61 object lblUsers: TLabel
62 Left = 164
63 Top = 4
64 Width = 159
65 Height = 13
66 Caption = 'Persons with defined Test Groups'
67 end
68 object lblOrder: TLabel
69 Left = 182
70 Top = 304
71 Width = 40
72 Height = 52
73 Caption = 'Arrange order of tests for display.'
74 WordWrap = True
75 end
76 object lblDefine: TLabel
77 Left = 356
78 Top = 4
79 Width = 92
80 Height = 13
81 Caption = 'Define Test Groups'
82 end
83 object lblTestGroup: TLabel
84 Left = 181
85 Top = 198
86 Width = 91
87 Height = 39
88 Caption = 'To create a New Test Group, limit selection to 7 tests.'
89 WordWrap = True
90 end
91 object pnlUpButton: TKeyClickPanel
92 Left = 235
93 Top = 299
94 Width = 27
95 Height = 27
96 BevelOuter = bvNone
97 Caption = 'Display selected test earlier'
98 Constraints.MaxHeight = 27
99 Constraints.MaxWidth = 27
100 TabOrder = 5
101 TabStop = True
102 OnClick = cmdUpClick
103 OnEnter = pnlUpButtonEnter
104 OnExit = pnlUpButtonExit
105 OnResize = pnlUpButtonResize
106 object cmdUp: TSpeedButton
107 Left = 0
108 Top = 1
109 Width = 27
110 Height = 25
111 Caption = '^'
112 Enabled = False
113 OnClick = cmdUpClick
114 end
115 end
116 object pnlDownButton: TKeyClickPanel
117 Left = 235
118 Top = 331
119 Width = 27
120 Height = 27
121 BevelOuter = bvNone
122 Caption = 'Display selected test later'
123 Constraints.MaxHeight = 27
124 Constraints.MaxWidth = 27
125 TabOrder = 6
126 TabStop = True
127 OnClick = cmdDownClick
128 OnEnter = pnlDownButtonEnter
129 OnExit = pnlDownButtonExit
130 OnResize = pnlDownButtonResize
131 object cmdDown: TSpeedButton
132 Left = 0
133 Top = 1
134 Width = 27
135 Height = 25
136 Caption = 'v'
137 Enabled = False
138 OnClick = cmdDownClick
139 end
140 end
141 object cmdOK: TButton
142 Left = 277
143 Top = 398
144 Width = 72
145 Height = 21
146 Caption = 'OK'
147 TabOrder = 8
148 OnClick = cmdOKClick
149 end
150 object cmdCancel: TButton
151 Left = 368
152 Top = 398
153 Width = 72
154 Height = 21
155 Cancel = True
156 Caption = 'Cancel'
157 ModalResult = 2
158 TabOrder = 9
159 end
160 object cmdClear: TButton
161 Left = 189
162 Top = 244
163 Width = 72
164 Height = 21
165 Caption = 'Remove All'
166 Enabled = False
167 TabOrder = 3
168 OnClick = cmdClearClick
169 end
170 object cmdRemove: TButton
171 Left = 189
172 Top = 268
173 Width = 72
174 Height = 21
175 Caption = 'Remove One'
176 Enabled = False
177 TabOrder = 4
178 OnClick = cmdRemoveClick
179 end
180 object lstList: TORListBox
181 Left = 280
182 Top = 166
183 Width = 160
184 Height = 211
185 ItemHeight = 13
186 ParentShowHint = False
187 ShowHint = True
188 TabOrder = 7
189 OnClick = lstListClick
190 Caption = 'Tests to be displayed'
191 ItemTipColor = clWindow
192 LongList = False
193 Pieces = '2'
194 end
195 object cboTests: TORComboBox
196 Left = 10
197 Top = 144
198 Width = 160
199 Height = 233
200 Style = orcsSimple
201 AutoSelect = True
202 Caption = 'Laboratory Tests'
203 Color = clWindow
204 DropDownCount = 8
205 ItemHeight = 13
206 ItemTipColor = clWindow
207 ItemTipEnable = True
208 ListItemsOnly = False
209 LongList = True
210 LookupPiece = 0
211 MaxLength = 0
212 ParentShowHint = False
213 Pieces = '2'
214 ShowHint = True
215 Sorted = False
216 SynonymChars = '<>'
217 TabOrder = 0
218 TabStop = True
219 OnChange = cboTestsChange
220 OnDblClick = cmdAddTestClick
221 OnEnter = cboTestsEnter
222 OnExit = cboTestsExit
223 OnNeedData = cboTestsNeedData
224 CharsNeedMatch = 1
225 end
226 object cboUsers: TORComboBox
227 Left = 164
228 Top = 26
229 Width = 160
230 Height = 21
231 Style = orcsDropDown
232 AutoSelect = True
233 Caption = 'Persons with defined Test Groups'
234 Color = clWindow
235 DropDownCount = 8
236 ItemHeight = 13
237 ItemTipColor = clWindow
238 ItemTipEnable = True
239 ListItemsOnly = False
240 LongList = True
241 LookupPiece = 0
242 MaxLength = 0
243 Pieces = '2'
244 Sorted = False
245 SynonymChars = '<>'
246 TabOrder = 10
247 OnClick = cboUsersClick
248 OnNeedData = cboUsersNeedData
249 CharsNeedMatch = 1
250 end
251 object lstTestGroups: TORListBox
252 Left = 10
253 Top = 56
254 Width = 319
255 Height = 57
256 ItemHeight = 13
257 ParentShowHint = False
258 ShowHint = True
259 TabOrder = 11
260 OnClick = lstTestGroupsClick
261 Caption = 'Test Groups'
262 ItemTipColor = clWindow
263 LongList = False
264 Pieces = '2'
265 end
266 object cmdReplace: TButton
267 Left = 368
268 Top = 60
269 Width = 72
270 Height = 21
271 Caption = 'Replace'
272 Enabled = False
273 TabOrder = 13
274 OnClick = cmdReplaceClick
275 end
276 object cboSpecimen: TORComboBox
277 Left = 12
278 Top = 402
279 Width = 160
280 Height = 21
281 Style = orcsDropDown
282 AutoSelect = True
283 Caption = 'Specimen'
284 Color = clWindow
285 DropDownCount = 8
286 ItemHeight = 13
287 ItemTipColor = clWindow
288 ItemTipEnable = True
289 ListItemsOnly = False
290 LongList = True
291 LookupPiece = 0
292 MaxLength = 0
293 ParentShowHint = False
294 Pieces = '2'
295 ShowHint = True
296 Sorted = False
297 SynonymChars = '<>'
298 TabOrder = 1
299 OnNeedData = cboSpecimenNeedData
300 CharsNeedMatch = 1
301 end
302 object cmdDelete: TButton
303 Left = 368
304 Top = 88
305 Width = 72
306 Height = 21
307 Caption = 'Delete'
308 Enabled = False
309 TabOrder = 14
310 OnClick = cmdDeleteClick
311 end
312 object cmdAdd: TButton
313 Left = 368
314 Top = 32
315 Width = 72
316 Height = 21
317 Caption = 'New'
318 Enabled = False
319 ParentShowHint = False
320 ShowHint = False
321 TabOrder = 12
322 OnClick = cmdAddClick
323 end
324 object cmdAddTest: TButton
325 Left = 189
326 Top = 144
327 Width = 72
328 Height = 21
329 Caption = 'Add'
330 Enabled = False
331 TabOrder = 2
332 OnClick = cmdAddTestClick
333 end
334 end
335 object DKLanguageController1: TDKLanguageController
336 Left = 416
337 Top = 128
338 LangData = {
339 100066726D4C61625465737447726F7570730101000000010000000700436170
340 74696F6E011B0000001000706E6C4C61625465737447726F7570730101000000
341 02000000070043617074696F6E000D0062766C5465737447726F757073000008
342 006C626C5465737473010100000003000000070043617074696F6E0007006C62
343 6C4C697374010100000004000000070043617074696F6E000B006C626C537065
344 63696D656E010100000005000000070043617074696F6E000D006C626C546573
345 7447726F757073010100000006000000070043617074696F6E0008006C626C55
346 73657273010100000007000000070043617074696F6E0008006C626C4F726465
347 72010100000008000000070043617074696F6E0009006C626C446566696E6501
348 0100000009000000070043617074696F6E000C006C626C5465737447726F7570
349 01010000000A000000070043617074696F6E000B00706E6C5570427574746F6E
350 01010000000B000000070043617074696F6E000500636D64557000000D00706E
351 6C446F776E427574746F6E01010000000C000000070043617074696F6E000700
352 636D64446F776E01010000000D000000070043617074696F6E000500636D644F
353 4B01010000000E000000070043617074696F6E000900636D6443616E63656C01
354 010000000F000000070043617074696F6E000800636D64436C65617201010000
355 0010000000070043617074696F6E000900636D6452656D6F7665010100000011
356 000000070043617074696F6E0007006C73744C69737401010000001200000007
357 0043617074696F6E00080063626F546573747301010000001300000007004361
358 7074696F6E00080063626F557365727301010000001400000007004361707469
359 6F6E000D006C73745465737447726F7570730101000000150000000700436170
360 74696F6E000A00636D645265706C616365010100000016000000070043617074
361 696F6E000B0063626F53706563696D656E010100000017000000070043617074
362 696F6E000900636D6444656C657465010100000018000000070043617074696F
363 6E000600636D64416464010100000019000000070043617074696F6E000A0063
364 6D644164645465737401010000001A000000070043617074696F6E00}
365 end
366end
Note: See TracBrowser for help on using the repository browser.