source: cprs/branches/foia-cprs/CPRS-Chart/Orders/fODAllgy.dfm@ 850

Last change on this file since 850 was 460, checked in by Kevin Toppenberg, 16 years ago

Uploading from OR_30_258
File size: 7.6 KB
Line 
1inherited frmODAllergy: TfrmODAllergy
2 Tag = 105
3 Left = 13
4 Top = 106
5 Height = 339
6 HorzScrollBar.Range = 520
7 HorzScrollBar.Visible = True
8 VertScrollBar.Range = 312
9 VertScrollBar.Visible = True
10 AutoScroll = False
11 Caption = 'Enter Allergy Information'
12 PixelsPerInch = 96
13 TextHeight = 13
14 object btnAgent: TSpeedButton [0]
15 Left = 175
16 Top = 61
17 Width = 19
18 Height = 19
19 Caption = '...'
20 Font.Charset = DEFAULT_CHARSET
21 Font.Color = clWindowText
22 Font.Height = -11
23 Font.Name = 'MS Sans Serif'
24 Font.Style = [fsBold]
25 ParentFont = False
26 OnClick = btnAgentClick
27 end
28 object lblReactionType: TOROffsetLabel [1]
29 Left = 7
30 Top = 81
31 Width = 188
32 Height = 15
33 Caption = 'Type of Reaction:'
34 HorzOffset = 2
35 Transparent = False
36 VertOffset = 2
37 WordWrap = False
38 end
39 object lblAgent: TOROffsetLabel [2]
40 Left = 7
41 Top = 44
42 Width = 188
43 Height = 15
44 Caption = 'Causative agent:'
45 HorzOffset = 2
46 Transparent = False
47 VertOffset = 2
48 WordWrap = False
49 end
50 object lblSymptoms: TOROffsetLabel [3]
51 Left = 7
52 Top = 125
53 Width = 134
54 Height = 15
55 Caption = 'Signs/Symptoms'
56 HorzOffset = 2
57 Transparent = False
58 VertOffset = 2
59 WordWrap = False
60 end
61 object lblSelectedSymptoms: TOROffsetLabel [4]
62 Left = 147
63 Top = 125
64 Width = 119
65 Height = 15
66 Caption = 'Selected Symptoms'
67 HorzOffset = 2
68 Transparent = False
69 VertOffset = 2
70 WordWrap = False
71 end
72 object lblComments: TOROffsetLabel [5]
73 Left = 281
74 Top = 125
75 Width = 226
76 Height = 15
77 Caption = 'Comments'
78 HorzOffset = 2
79 Transparent = False
80 VertOffset = 2
81 WordWrap = False
82 end
83 object lblOriginator: TOROffsetLabel [6]
84 Left = 209
85 Top = 6
86 Width = 45
87 Height = 15
88 Caption = 'Observer'
89 HorzOffset = 2
90 Transparent = False
91 VertOffset = 2
92 WordWrap = False
93 end
94 object Bevel1: TBevel [7]
95 Left = 2
96 Top = 125
97 Width = 273
98 Height = 125
99 end
100 object lblObservedDate: TOROffsetLabel [8]
101 Left = 366
102 Top = 46
103 Width = 140
104 Height = 15
105 Caption = 'Reaction Date/Time'
106 HorzOffset = 2
107 Transparent = False
108 VertOffset = 2
109 WordWrap = False
110 end
111 object lblSeverity: TOROffsetLabel [9]
112 Left = 365
113 Top = 82
114 Width = 141
115 Height = 15
116 Caption = 'Severity'
117 HorzOffset = 2
118 Transparent = False
119 VertOffset = 2
120 WordWrap = False
121 end
122 object lstAllergy: TORListBox [10]
123 Left = 8
124 Top = 61
125 Width = 166
126 Height = 21
127 Color = clBtnFace
128 ExtendedSelect = False
129 ItemHeight = 13
130 ParentShowHint = False
131 ShowHint = True
132 TabOrder = 2
133 OnClick = lstAllergyClick
134 Caption = 'Causative agent'
135 ItemTipColor = clWindow
136 LongList = False
137 Pieces = '2'
138 OnChange = ControlChange
139 end
140 inherited memOrder: TCaptionMemo
141 Left = 5
142 Top = 256
143 TabOrder = 16
144 end
145 inherited cmdAccept: TButton
146 Left = 441
147 Top = 256
148 Caption = 'Accept'
149 TabOrder = 13
150 end
151 inherited cmdQuit: TButton
152 Left = 441
153 Top = 283
154 TabOrder = 14
155 end
156 inherited pnlMessage: TPanel
157 Left = 20
158 Top = 253
159 TabOrder = 15
160 inherited memMessage: TRichEdit
161 Left = 41
162 end
163 end
164 object cboReactionType: TORComboBox
165 Left = 7
166 Top = 96
167 Width = 190
168 Height = 21
169 Style = orcsDropDown
170 AutoSelect = True
171 Caption = 'Type of Reaction'
172 Color = clWindow
173 DropDownCount = 8
174 ItemHeight = 13
175 ItemTipColor = clWindow
176 ItemTipEnable = True
177 ListItemsOnly = True
178 LongList = False
179 LookupPiece = 0
180 MaxLength = 0
181 Pieces = '2'
182 Sorted = False
183 SynonymChars = '<>'
184 TabOrder = 3
185 OnChange = ControlChange
186 CharsNeedMatch = 1
187 end
188 object grpObsHist: TRadioGroup
189 Left = 364
190 Top = 11
191 Width = 147
192 Height = 30
193 Columns = 2
194 Ctl3D = True
195 Items.Strings = (
196 '&Observed'
197 '&Historical')
198 ParentCtl3D = False
199 TabOrder = 9
200 OnClick = grpObsHistClick
201 end
202 object memComments: TRichEdit
203 Left = 282
204 Top = 142
205 Width = 229
206 Height = 104
207 TabOrder = 12
208 WantTabs = True
209 OnExit = memCommentsExit
210 OnKeyUp = memCommentsKeyUp
211 end
212 object lstSelectedSymptoms: TORListBox
213 Left = 147
214 Top = 143
215 Width = 122
216 Height = 75
217 ExtendedSelect = False
218 ItemHeight = 13
219 ParentShowHint = False
220 ShowHint = True
221 TabOrder = 5
222 Caption = 'Selected Symptoms'
223 ItemTipColor = clWindow
224 LongList = False
225 Pieces = '2,4'
226 OnChange = ControlChange
227 end
228 object ckNoKnownAllergies: TCheckBox
229 Left = 8
230 Top = 18
231 Width = 119
232 Height = 17
233 Caption = 'No Known Allergies'
234 TabOrder = 0
235 OnClick = ckNoKnownAllergiesClick
236 end
237 object cboOriginator: TORComboBox
238 Left = 210
239 Top = 22
240 Width = 139
241 Height = 96
242 Anchors = [akLeft, akTop, akRight]
243 Style = orcsSimple
244 AutoSelect = True
245 Caption = 'Observer'
246 Color = clWindow
247 DropDownCount = 8
248 ItemHeight = 13
249 ItemTipColor = clWindow
250 ItemTipEnable = True
251 ListItemsOnly = True
252 LongList = True
253 LookupPiece = 2
254 MaxLength = 0
255 ParentShowHint = False
256 Pieces = '2,3'
257 ShowHint = False
258 Sorted = False
259 SynonymChars = '<>'
260 TabOrder = 8
261 OnChange = ControlChange
262 OnNeedData = cboOriginatorNeedData
263 CharsNeedMatch = 1
264 end
265 object cboSymptoms: TORComboBox
266 Left = 7
267 Top = 143
268 Width = 135
269 Height = 103
270 Style = orcsSimple
271 AutoSelect = True
272 Caption = 'Signs/Symptoms'
273 Color = clWindow
274 DropDownCount = 8
275 ItemHeight = 13
276 ItemTipColor = clWindow
277 ItemTipEnable = True
278 ListItemsOnly = True
279 LongList = True
280 LookupPiece = 0
281 MaxLength = 0
282 Pieces = '2'
283 Sorted = False
284 SynonymChars = '<>'
285 TabOrder = 4
286 OnKeyDown = cboSymptomsKeyDown
287 OnMouseClick = cboSymptomsMouseClick
288 OnNeedData = cboSymptomsNeedData
289 CharsNeedMatch = 1
290 end
291 object btnCurrent: TButton
292 Left = 137
293 Top = 14
294 Width = 56
295 Height = 21
296 Caption = 'Current'
297 TabOrder = 1
298 OnClick = btnCurrentClick
299 end
300 object calObservedDate: TORDateBox
301 Left = 365
302 Top = 62
303 Width = 145
304 Height = 21
305 TabOrder = 10
306 OnChange = ControlChange
307 DateOnly = False
308 RequireTime = False
309 Caption = 'Reaction Date/Time'
310 end
311 object cboSeverity: TORComboBox
312 Left = 365
313 Top = 97
314 Width = 144
315 Height = 21
316 Style = orcsDropDown
317 AutoSelect = True
318 Caption = 'Severity'
319 Color = clWindow
320 DropDownCount = 8
321 ItemHeight = 13
322 ItemTipColor = clWindow
323 ItemTipEnable = True
324 ListItemsOnly = True
325 LongList = False
326 LookupPiece = 0
327 MaxLength = 0
328 Pieces = '2'
329 Sorted = False
330 SynonymChars = '<>'
331 TabOrder = 11
332 OnChange = ControlChange
333 CharsNeedMatch = 1
334 end
335 object btnRemove: TButton
336 Left = 210
337 Top = 224
338 Width = 57
339 Height = 21
340 Caption = 'Remove'
341 TabOrder = 7
342 OnClick = btnRemoveClick
343 end
344 object btnDateTime: TButton
345 Left = 147
346 Top = 224
347 Width = 62
348 Height = 21
349 Caption = 'Date/Time'
350 TabOrder = 6
351 OnClick = btnDateTimeClick
352 end
353 object dlgReactionDateTime: TORDateTimeDlg
354 FMDateTime = 2981202
355 DateOnly = False
356 RequireTime = False
357 Left = 242
358 Top = 10
359 end
360end
Note: See TracBrowser for help on using the repository browser.