source: cprs/branches/foia-cprs/CPRS-Chart/fMedCopy.dfm@ 711

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

Adding foia-cprs branch

File size: 4.9 KB
Line 
1object frmMedCopy: TfrmMedCopy
2 Left = 157
3 Top = 62
4 Width = 493
5 Height = 428
6 Caption = 'Copy Medication Orders'
7 Color = clBtnFace
8 Constraints.MinHeight = 150
9 Constraints.MinWidth = 240
10 Font.Charset = DEFAULT_CHARSET
11 Font.Color = clWindowText
12 Font.Height = -11
13 Font.Name = 'MS Sans Serif'
14 Font.Style = []
15 OldCreateOrder = True
16 OnCreate = FormCreate
17 OnKeyDown = FormKeyDown
18 PixelsPerInch = 96
19 TextHeight = 13
20 object Panel1: TPanel
21 Left = 0
22 Top = 0
23 Width = 485
24 Height = 75
25 Align = alTop
26 AutoSize = True
27 TabOrder = 1
28 object lblPtInfo: TLabel
29 Left = 1
30 Top = 1
31 Width = 483
32 Height = 40
33 Align = alTop
34 Constraints.MinHeight = 40
35 Layout = tlCenter
36 end
37 object Panel2: TPanel
38 Left = 1
39 Top = 41
40 Width = 483
41 Height = 33
42 Align = alTop
43 AutoSize = True
44 TabOrder = 0
45 object Image1: TImage
46 Left = 1
47 Top = 1
48 Width = 24
49 Height = 31
50 Align = alLeft
51 AutoSize = True
52 Enabled = False
53 Picture.Data = {
54 07544269746D61707E010000424D7E0100000000000076000000280000001800
55 000016000000010004000000000008010000C40E0000C40E0000100000000000
56 0000000000000000800000800000008080008000000080008000808000008080
57 8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
58 FF008000000000000000000000080777777777777777777777700F7777777777
59 7777777777700F88888888888888888887700F88888888888888888887700F88
60 888808888888888887700F88888800888888888887700F8888880B0888888888
61 87700F8888880BB00008888887700F888800BBCCBBB0088887700F8880BBBCCC
62 CBBBB08887700F880BBBBBBBBBBBBB0887700F880BBBBBCCBBBBBB0887700F88
63 0BBBBBCCBBBBBB0887700F880BBBBBCCBBBBBB0887700F8880BBBBCCBBBBB088
64 87700F888800BBBBBBB0088887700F88888800000008888887700F8888888888
65 8888888887700F88888888888888888887700FFFFFFFFFFFFFFFFFFFFF708000
66 00000000000000000008}
67 Transparent = True
68 end
69 object lblInstruction: TStaticText
70 Left = 30
71 Top = 1
72 Width = 441
73 Height = 17
74 Caption =
75 ' Use Admit: if patient is newly admitted to the hospital or nur' +
76 'sing home.'
77 TabOrder = 0
78 end
79 object Label1: TStaticText
80 Left = 30
81 Top = 15
82 Width = 455
83 Height = 17
84 Caption =
85 ' Use Transfer: if inpatient will move from one ward or treating' +
86 ' team to another.'
87 TabOrder = 1
88 end
89 end
90 end
91 object Panel3: TPanel
92 Left = 0
93 Top = 75
94 Width = 485
95 Height = 65
96 Align = alTop
97 TabOrder = 0
98 object GroupBox2: TGroupBox
99 Left = 1
100 Top = 1
101 Width = 483
102 Height = 63
103 Align = alClient
104 TabOrder = 0
105 DesignSize = (
106 483
107 63)
108 object radDelayed: TRadioButton
109 Left = 20
110 Top = 37
111 Width = 321
112 Height = 17
113 Caption = '&Delay release of copied orders until'
114 TabOrder = 1
115 OnClick = radDelayedClick
116 end
117 object radRelease: TRadioButton
118 Left = 20
119 Top = 16
120 Width = 319
121 Height = 17
122 Caption = '&Release copied orders immediately'
123 Checked = True
124 TabOrder = 0
125 TabStop = True
126 OnClick = radReleaseClick
127 end
128 object cmdOK: TButton
129 Left = 365
130 Top = 15
131 Width = 72
132 Height = 19
133 Anchors = [akTop, akRight]
134 Caption = 'OK'
135 Constraints.MaxWidth = 73
136 Default = True
137 TabOrder = 2
138 OnClick = cmdOKClick
139 end
140 object cmdCancel: TButton
141 Left = 365
142 Top = 37
143 Width = 72
144 Height = 19
145 Anchors = [akTop, akRight]
146 Cancel = True
147 Caption = 'Cancel'
148 Constraints.MaxWidth = 73
149 TabOrder = 3
150 OnClick = cmdCancelClick
151 end
152 end
153 end
154 object Panel4: TPanel
155 Left = 0
156 Top = 140
157 Width = 485
158 Height = 261
159 Align = alClient
160 TabOrder = 2
161 inline fraEvntDelayList: TfraEvntDelayList
162 Left = 1
163 Top = 1
164 Width = 483
165 Height = 259
166 Align = alClient
167 TabOrder = 0
168 Visible = False
169 inherited pnlDate: TPanel
170 Left = 378
171 Height = 259
172 inherited lblEffective: TLabel
173 Left = 446
174 end
175 inherited orDateBox: TORDateBox
176 Left = 446
177 end
178 end
179 inherited pnlList: TPanel
180 Width = 378
181 Height = 259
182 inherited mlstEvents: TORListBox
183 Width = 376
184 Height = 236
185 OnDblClick = cmdOKClick
186 end
187 inherited edtSearch: TCaptionEdit
188 Width = 376
189 end
190 end
191 end
192 end
193end
Note: See TracBrowser for help on using the repository browser.