source: cprs/trunk/CPRS-Chart/Orders/fOrdersTS.dfm@ 1797

Last change on this file since 1797 was 1679, checked in by healthsevak, 10 years ago

Updating the working copy to CPRS version 28
File size: 7.4 KB
Line 
1inherited frmOrdersTS: TfrmOrdersTS
2 Left = 84
3 Top = 77
4 Caption = 'Release Orders'
5 ClientHeight = 351
6 ClientWidth = 456
7 Constraints.MinHeight = 365
8 Constraints.MinWidth = 310
9 OnClose = FormClose
10 OnCreate = FormCreate
11 ExplicitWidth = 464
12 ExplicitHeight = 385
13 PixelsPerInch = 96
14 TextHeight = 13
15 object pnlMiddle: TPanel [0]
16 Left = 0
17 Top = 60
18 Width = 456
19 Height = 56
20 Align = alTop
21 Constraints.MinHeight = 45
22 TabOrder = 1
23 object grpChoice: TGroupBox
24 Left = 1
25 Top = 1
26 Width = 454
27 Height = 54
28 Align = alClient
29 Constraints.MinHeight = 45
30 TabOrder = 0
31 DesignSize = (
32 454
33 54)
34 object radReleaseNow: TRadioButton
35 Left = 20
36 Top = 13
37 Width = 333
38 Height = 17
39 Caption = ' &Release new orders immediately'
40 Enabled = False
41 TabOrder = 0
42 OnClick = radReleaseNowClick
43 end
44 object radDelayed: TRadioButton
45 Left = 20
46 Top = 29
47 Width = 329
48 Height = 21
49 Caption = ' &Delay release of new order(s) until'
50 TabOrder = 1
51 OnClick = radDelayedClick
52 end
53 object cmdOK: TButton
54 Left = 355
55 Top = 9
56 Width = 75
57 Height = 20
58 Anchors = [akRight, akBottom]
59 Caption = 'OK'
60 Default = True
61 TabOrder = 2
62 OnClick = cmdOKClick
63 end
64 object cmdCancel: TButton
65 Left = 355
66 Top = 31
67 Width = 75
68 Height = 20
69 Anchors = [akRight, akBottom]
70 Cancel = True
71 Caption = 'Cancel'
72 TabOrder = 3
73 OnClick = cmdCancelClick
74 end
75 end
76 end
77 object pnlTop: TPanel [1]
78 Left = 0
79 Top = 0
80 Width = 456
81 Height = 60
82 Align = alTop
83 Anchors = [akLeft, akTop, akRight, akBottom]
84 AutoSize = True
85 BorderStyle = bsSingle
86 TabOrder = 0
87 object lblPtInfo: TVA508StaticText
88 Name = 'lblPtInfo'
89 Left = 1
90 Top = 1
91 Width = 450
92 Height = 34
93 Align = alTop
94 Alignment = taLeftJustify
95 Constraints.MinHeight = 34
96 TabOrder = 0
97 ShowAccelChar = True
98 end
99 object pnldif: TPanel
100 Left = 1
101 Top = 35
102 Width = 450
103 Height = 20
104 Align = alTop
105 Anchors = [akLeft, akTop, akRight, akBottom]
106 TabOrder = 1
107 object Image1: TImage
108 Left = 1
109 Top = 1
110 Width = 24
111 Height = 18
112 Align = alLeft
113 AutoSize = True
114 Enabled = False
115 Picture.Data = {
116 07544269746D61707E010000424D7E0100000000000076000000280000001800
117 000016000000010004000000000008010000C40E0000C40E0000100000000000
118 0000000000000000800000800000008080008000000080008000808000008080
119 8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
120 FF008000000000000000000000080777777777777777777777700F7777777777
121 7777777777700F88888888888888888887700F88888888888888888887700F88
122 888808888888888887700F88888800888888888887700F8888880B0888888888
123 87700F8888880BB00008888887700F888800BBCCBBB0088887700F8880BBBCCC
124 CBBBB08887700F880BBBBBBBBBBBBB0887700F880BBBBBCCBBBBBB0887700F88
125 0BBBBBCCBBBBBB0887700F880BBBBBCCBBBBBB0887700F8880BBBBCCBBBBB088
126 87700F888800BBBBBBB0088887700F88888800000008888887700F8888888888
127 8888888887700F88888888888888888887700FFFFFFFFFFFFFFFFFFFFF708000
128 00000000000000000008}
129 Transparent = True
130 ExplicitHeight = 36
131 end
132 object lblUseAdmit: TVA508StaticText
133 Name = 'lblUseAdmit'
134 Left = 34
135 Top = 4
136 Width = 329
137 Height = 15
138 Alignment = taLeftJustify
139 Caption =
140 'Use Admit: if patient is newly admitted to the hospital or nursi' +
141 'ng home.'
142 TabOrder = 0
143 ShowAccelChar = True
144 end
145 object lblUseTransfer: TVA508StaticText
146 Name = 'lblUseTransfer'
147 Left = 34
148 Top = 21
149 Width = 363
150 Height = 15
151 Alignment = taLeftJustify
152 Caption =
153 'Use Transfer: if inpatient will move from one ward or treating t' +
154 'eam to another.'
155 TabOrder = 1
156 Visible = False
157 ShowAccelChar = True
158 end
159 end
160 end
161 object pnlBottom: TPanel [2]
162 Left = 0
163 Top = 116
164 Width = 456
165 Height = 235
166 Align = alClient
167 TabOrder = 2
168 ExplicitTop = 112
169 ExplicitHeight = 239
170 inline fraEvntDelayList: TfraEvntDelayList
171 Left = 1
172 Top = 1
173 Width = 454
174 Height = 233
175 Align = alClient
176 AutoScroll = True
177 TabOrder = 0
178 Visible = False
179 ExplicitLeft = 1
180 ExplicitTop = 1
181 ExplicitWidth = 454
182 ExplicitHeight = 237
183 inherited pnlDate: TPanel
184 Left = 349
185 Height = 233
186 ExplicitLeft = 349
187 ExplicitHeight = 237
188 inherited lblEffective: TLabel
189 Left = 453
190 Width = 71
191 ExplicitLeft = 453
192 ExplicitWidth = 71
193 end
194 inherited orDateBox: TORDateBox
195 Left = 453
196 ExplicitLeft = 453
197 end
198 end
199 inherited pnlList: TPanel
200 Width = 349
201 Height = 233
202 ExplicitWidth = 349
203 ExplicitHeight = 237
204 inherited lblEvntDelayList: TLabel
205 Width = 347
206 ExplicitWidth = 80
207 end
208 inherited mlstEvents: TORListBox
209 Width = 347
210 Height = 197
211 OnDblClick = cmdOKClick
212 OnChange = fraEvntDelayListmlstEventsChange
213 ExplicitWidth = 347
214 ExplicitHeight = 201
215 end
216 inherited edtSearch: TCaptionEdit
217 Width = 347
218 ExplicitWidth = 347
219 end
220 end
221 end
222 end
223 inherited amgrMain: TVA508AccessibilityManager
224 Data = (
225 (
226 'Component = pnlMiddle'
227 'Status = stsDefault')
228 (
229 'Component = grpChoice'
230 'Status = stsDefault')
231 (
232 'Component = radReleaseNow'
233 'Status = stsDefault')
234 (
235 'Component = radDelayed'
236 'Status = stsDefault')
237 (
238 'Component = cmdOK'
239 'Status = stsDefault')
240 (
241 'Component = cmdCancel'
242 'Status = stsDefault')
243 (
244 'Component = pnlTop'
245 'Status = stsDefault')
246 (
247 'Component = pnldif'
248 'Status = stsDefault')
249 (
250 'Component = pnlBottom'
251 'Status = stsDefault')
252 (
253 'Component = fraEvntDelayList'
254 'Status = stsDefault')
255 (
256 'Component = fraEvntDelayList.pnlDate'
257 'Status = stsDefault')
258 (
259 'Component = fraEvntDelayList.orDateBox'
260 'Status = stsDefault')
261 (
262 'Component = fraEvntDelayList.pnlList'
263 'Status = stsDefault')
264 (
265 'Component = fraEvntDelayList.mlstEvents'
266 'Status = stsDefault')
267 (
268 'Component = fraEvntDelayList.edtSearch'
269 'Status = stsDefault')
270 (
271 'Component = frmOrdersTS'
272 'Status = stsDefault')
273 (
274 'Component = lblUseTransfer'
275 'Status = stsDefault')
276 (
277 'Component = lblPtInfo'
278 'Status = stsDefault')
279 (
280 'Component = lblUseAdmit'
281 'Status = stsDefault'))
282 end
283end
Note: See TracBrowser for help on using the repository browser.