source: cprs/branches/foia-cprs/CPRS-Chart/Orders/fOrdersCopy.dfm@ 1623

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

Adding foia-cprs branch

File size: 5.3 KB
Line 
1object frmCopyOrders: TfrmCopyOrders
2 Left = 319
3 Top = 139
4 AutoScroll = False
5 Caption = 'Copy Orders'
6 ClientHeight = 419
7 ClientWidth = 441
8 Color = clBtnFace
9 Constraints.MinHeight = 100
10 Constraints.MinWidth = 330
11 Font.Charset = DEFAULT_CHARSET
12 Font.Color = clWindowText
13 Font.Height = -11
14 Font.Name = 'MS Sans Serif'
15 Font.Style = []
16 OldCreateOrder = True
17 OnCreate = FormCreate
18 OnKeyDown = FormKeyDown
19 PixelsPerInch = 96
20 TextHeight = 13
21 object pnlInfo: TPanel
22 Left = 0
23 Top = 41
24 Width = 441
25 Height = 50
26 Align = alTop
27 TabOrder = 1
28 object Image1: TImage
29 Left = 1
30 Top = 1
31 Width = 24
32 Height = 22
33 AutoSize = True
34 Enabled = False
35 Picture.Data = {
36 07544269746D61707E010000424D7E0100000000000076000000280000001800
37 000016000000010004000000000008010000C40E0000C40E0000100000000000
38 0000000000000000800000800000008080008000000080008000808000008080
39 8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
40 FF008000000000000000000000080777777777777777777777700F7777777777
41 7777777777700F88888888888888888887700F88888888888888888887700F88
42 888808888888888887700F88888800888888888887700F8888880B0888888888
43 87700F8888880BB00008888887700F888800BBCCBBB0088887700F8880BBBCCC
44 CBBBB08887700F880BBBBBBBBBBBBB0887700F880BBBBBCCBBBBBB0887700F88
45 0BBBBBCCBBBBBB0887700F880BBBBBCCBBBBBB0887700F8880BBBBCCBBBBB088
46 87700F888800BBBBBBB0088887700F88888800000008888887700F8888888888
47 8888888887700F88888888888888888887700FFFFFFFFFFFFFFFFFFFFF708000
48 00000000000000000008}
49 Transparent = True
50 end
51 object Label2: TStaticText
52 Left = 31
53 Top = 30
54 Width = 365
55 Height = 17
56 Caption =
57 'Use Transfer: if inpatient will move from one ward or treating t' +
58 'eam to another.'
59 TabOrder = 1
60 TabStop = True
61 end
62 object Label1: TStaticText
63 Left = 31
64 Top = 4
65 Width = 331
66 Height = 17
67 Caption =
68 'Use Admit: if patient is newly admitted to the hospital or nursi' +
69 'ng home.'
70 TabOrder = 0
71 TabStop = True
72 end
73 end
74 inline fraEvntDelayList: TfraEvntDelayList
75 Left = 0
76 Top = 154
77 Width = 441
78 Height = 265
79 Align = alClient
80 TabOrder = 3
81 Visible = False
82 inherited pnlDate: TPanel
83 Left = 336
84 Height = 265
85 inherited lblEffective: TLabel
86 Left = 451
87 end
88 inherited orDateBox: TORDateBox
89 Left = 451
90 end
91 end
92 inherited pnlList: TPanel
93 Width = 336
94 Height = 265
95 inherited lblEvntDelayList: TLabel
96 Width = 334
97 end
98 inherited mlstEvents: TORListBox
99 Width = 334
100 Height = 229
101 OnDblClick = cmdOKClick
102 OnChange = fraEvntDelayListmlstEventsChange
103 end
104 inherited edtSearch: TCaptionEdit
105 Width = 334
106 end
107 end
108 end
109 object pnlRadio: TPanel
110 Left = 0
111 Top = 91
112 Width = 441
113 Height = 63
114 Align = alTop
115 TabOrder = 2
116 object GroupBox1: TGroupBox
117 Left = 1
118 Top = 1
119 Width = 439
120 Height = 61
121 Align = alClient
122 Constraints.MinHeight = 50
123 DragMode = dmAutomatic
124 TabOrder = 0
125 object radRelease: TRadioButton
126 Left = 12
127 Top = 15
128 Width = 318
129 Height = 20
130 Caption = '&Release copied orders immediately'
131 Checked = True
132 TabOrder = 0
133 TabStop = True
134 OnClick = radReleaseClick
135 end
136 object radEvtDelay: TRadioButton
137 Left = 12
138 Top = 37
139 Width = 320
140 Height = 20
141 Caption = '&Delay release of copied orders'
142 TabOrder = 1
143 OnClick = radEvtDelayClick
144 end
145 end
146 end
147 object pnlTop: TPanel
148 Left = 0
149 Top = 0
150 Width = 441
151 Height = 41
152 Align = alTop
153 BevelOuter = bvNone
154 TabOrder = 0
155 object lblPtInfo: TStaticText
156 Left = 0
157 Top = 0
158 Width = 441
159 Height = 41
160 Align = alTop
161 Anchors = [akLeft, akTop, akRight, akBottom]
162 AutoSize = False
163 Constraints.MinHeight = 40
164 TabOrder = 0
165 TabStop = True
166 end
167 end
168 object pnlBtns: TPanel
169 Left = 334
170 Top = 91
171 Width = 107
172 Height = 63
173 Align = alCustom
174 Anchors = [akTop, akRight]
175 TabOrder = 4
176 object gbBtns: TGroupBox
177 Left = 1
178 Top = 1
179 Width = 105
180 Height = 61
181 Align = alClient
182 TabOrder = 0
183 DesignSize = (
184 105
185 61)
186 object cmdOK: TButton
187 Left = 17
188 Top = 13
189 Width = 72
190 Height = 19
191 Anchors = [akTop, akRight]
192 Caption = 'OK'
193 Constraints.MaxWidth = 73
194 Default = True
195 TabOrder = 0
196 OnClick = cmdOKClick
197 end
198 object cmdCancel: TButton
199 Left = 17
200 Top = 34
201 Width = 72
202 Height = 18
203 Anchors = [akRight, akBottom]
204 Cancel = True
205 Caption = 'Cancel'
206 Constraints.MaxWidth = 73
207 TabOrder = 1
208 OnClick = cmdCancelClick
209 end
210 end
211 end
212end
Note: See TracBrowser for help on using the repository browser.