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

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

Adding foia-cprs branch
File size: 7.5 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 end
187 object grpObsHist: TRadioGroup
188 Left = 364
189 Top = 11
190 Width = 147
191 Height = 30
192 Columns = 2
193 Ctl3D = True
194 Items.Strings = (
195 '&Observed'
196 '&Historical')
197 ParentCtl3D = False
198 TabOrder = 9
199 OnClick = grpObsHistClick
200 end
201 object memComments: TRichEdit
202 Left = 282
203 Top = 142
204 Width = 229
205 Height = 104
206 TabOrder = 12
207 WantTabs = True
208 OnExit = memCommentsExit
209 OnKeyUp = memCommentsKeyUp
210 end
211 object lstSelectedSymptoms: TORListBox
212 Left = 147
213 Top = 143
214 Width = 122
215 Height = 75
216 ExtendedSelect = False
217 ItemHeight = 13
218 ParentShowHint = False
219 ShowHint = True
220 TabOrder = 5
221 Caption = 'Selected Symptoms'
222 ItemTipColor = clWindow
223 LongList = False
224 Pieces = '2,4'
225 OnChange = ControlChange
226 end
227 object ckNoKnownAllergies: TCheckBox
228 Left = 8
229 Top = 18
230 Width = 119
231 Height = 17
232 Caption = 'No Known Allergies'
233 TabOrder = 0
234 OnClick = ckNoKnownAllergiesClick
235 end
236 object cboOriginator: TORComboBox
237 Left = 210
238 Top = 22
239 Width = 139
240 Height = 96
241 Anchors = [akLeft, akTop, akRight]
242 Style = orcsSimple
243 AutoSelect = True
244 Caption = 'Observer'
245 Color = clWindow
246 DropDownCount = 8
247 ItemHeight = 13
248 ItemTipColor = clWindow
249 ItemTipEnable = True
250 ListItemsOnly = True
251 LongList = True
252 LookupPiece = 2
253 MaxLength = 0
254 ParentShowHint = False
255 Pieces = '2,3'
256 ShowHint = False
257 Sorted = False
258 SynonymChars = '<>'
259 TabOrder = 8
260 OnChange = ControlChange
261 OnNeedData = cboOriginatorNeedData
262 end
263 object cboSymptoms: TORComboBox
264 Left = 7
265 Top = 143
266 Width = 135
267 Height = 103
268 Style = orcsSimple
269 AutoSelect = True
270 Caption = 'Signs/Symptoms'
271 Color = clWindow
272 DropDownCount = 8
273 ItemHeight = 13
274 ItemTipColor = clWindow
275 ItemTipEnable = True
276 ListItemsOnly = True
277 LongList = True
278 LookupPiece = 0
279 MaxLength = 0
280 Pieces = '2'
281 Sorted = False
282 SynonymChars = '<>'
283 TabOrder = 4
284 OnKeyDown = cboSymptomsKeyDown
285 OnMouseClick = cboSymptomsMouseClick
286 OnNeedData = cboSymptomsNeedData
287 end
288 object btnCurrent: TButton
289 Left = 137
290 Top = 14
291 Width = 56
292 Height = 21
293 Caption = 'Current'
294 TabOrder = 1
295 OnClick = btnCurrentClick
296 end
297 object calObservedDate: TORDateBox
298 Left = 365
299 Top = 62
300 Width = 145
301 Height = 21
302 TabOrder = 10
303 OnChange = ControlChange
304 DateOnly = False
305 RequireTime = False
306 Caption = 'Reaction Date/Time'
307 end
308 object cboSeverity: TORComboBox
309 Left = 365
310 Top = 97
311 Width = 144
312 Height = 21
313 Style = orcsDropDown
314 AutoSelect = True
315 Caption = 'Severity'
316 Color = clWindow
317 DropDownCount = 8
318 ItemHeight = 13
319 ItemTipColor = clWindow
320 ItemTipEnable = True
321 ListItemsOnly = True
322 LongList = False
323 LookupPiece = 0
324 MaxLength = 0
325 Pieces = '2'
326 Sorted = False
327 SynonymChars = '<>'
328 TabOrder = 11
329 OnChange = ControlChange
330 end
331 object btnRemove: TButton
332 Left = 210
333 Top = 224
334 Width = 57
335 Height = 21
336 Caption = 'Remove'
337 TabOrder = 7
338 OnClick = btnRemoveClick
339 end
340 object btnDateTime: TButton
341 Left = 147
342 Top = 224
343 Width = 62
344 Height = 21
345 Caption = 'Date/Time'
346 TabOrder = 6
347 OnClick = btnDateTimeClick
348 end
349 object dlgReactionDateTime: TORDateTimeDlg
350 FMDateTime = 2981202
351 DateOnly = False
352 RequireTime = False
353 Left = 242
354 Top = 10
355 end
356end
Note: See TracBrowser for help on using the repository browser.