source: cprs/branches/HealthSevak-CPRS/CPRS-Chart/Templates/fTemplateFields.dfm@ 1679

Last change on this file since 1679 was 829, checked in by Kevin Toppenberg, 14 years ago

Upgrade to version 27
File size: 6.1 KB
Line 
1inherited frmTemplateFields: TfrmTemplateFields
2 Left = 212
3 Top = 155
4 Caption = 'Insert Template Field'
5 ClientHeight = 319
6 ClientWidth = 450
7 FormStyle = fsStayOnTop
8 Position = poOwnerFormCenter
9 OnClose = FormClose
10 OnCreate = FormCreate
11 OnShow = FormShow
12 ExplicitWidth = 458
13 ExplicitHeight = 346
14 PixelsPerInch = 96
15 TextHeight = 13
16 object pnlBottom: TPanel [0]
17 Left = 0
18 Top = 226
19 Width = 450
20 Height = 28
21 Align = alBottom
22 BevelOuter = bvNone
23 TabOrder = 1
24 DesignSize = (
25 450
26 28)
27 object btnCancel: TButton
28 Left = 371
29 Top = 4
30 Width = 75
31 Height = 21
32 Anchors = [akTop, akRight]
33 Cancel = True
34 Caption = '&Done'
35 ModalResult = 2
36 TabOrder = 3
37 OnClick = btnCancelClick
38 end
39 object btnInsert: TButton
40 Left = 291
41 Top = 4
42 Width = 75
43 Height = 21
44 Anchors = [akTop, akRight]
45 Caption = '&Insert Field'
46 Default = True
47 ModalResult = 4
48 TabOrder = 2
49 OnClick = btnInsertClick
50 end
51 object btnPreview: TButton
52 Left = 211
53 Top = 4
54 Width = 75
55 Height = 21
56 Anchors = [akTop, akRight]
57 Caption = '&Preview'
58 Enabled = False
59 TabOrder = 1
60 OnClick = btnPreviewClick
61 end
62 object lblReq: TVA508StaticText
63 Name = 'lblReq'
64 AlignWithMargins = True
65 Left = 10
66 Top = 12
67 Width = 132
68 Height = 15
69 Alignment = taLeftJustify
70 Anchors = [akLeft, akBottom]
71 Caption = '* Indicates a Required Field'
72 TabOrder = 0
73 ShowAccelChar = True
74 end
75 end
76 object cboObjects: TORComboBox [1]
77 Left = 0
78 Top = 0
79 Width = 450
80 Height = 226
81 Style = orcsSimple
82 Align = alClient
83 AutoSelect = True
84 Caption = 'Template Field'
85 Color = clWindow
86 DropDownCount = 8
87 ItemHeight = 13
88 ItemTipColor = clWindow
89 ItemTipEnable = True
90 ListItemsOnly = True
91 LongList = True
92 LookupPiece = 0
93 MaxLength = 0
94 Pieces = '2,3'
95 HideSynonyms = True
96 Sorted = False
97 SynonymChars = '<Inactive>'
98 TabPositions = '50,60,70,80,90'
99 TabOrder = 0
100 TabStop = True
101 OnChange = cboObjectsChange
102 OnDblClick = cboObjectsDblClick
103 OnNeedData = cboObjectsNeedData
104 CharsNeedMatch = 1
105 end
106 object pnlBottomSR: TPanel [2]
107 Left = 0
108 Top = 254
109 Width = 450
110 Height = 65
111 Align = alBottom
112 BevelOuter = bvNone
113 TabOrder = 2
114 object lblSRCont2: TVA508StaticText
115 Name = 'lblSRCont2'
116 AlignWithMargins = True
117 Left = 24
118 Top = 45
119 Width = 423
120 Height = 15
121 Margins.Left = 24
122 Margins.Top = 0
123 Margins.Bottom = 0
124 Align = alTop
125 Alignment = taLeftJustify
126 Caption =
127 'speaking text that follows the template field, when the field re' +
128 'ceives focus.'
129 TabOrder = 3
130 ShowAccelChar = True
131 end
132 object lblSRCont1: TVA508StaticText
133 Name = 'lblSRCont1'
134 AlignWithMargins = True
135 Left = 10
136 Top = 30
137 Width = 437
138 Height = 15
139 Margins.Left = 10
140 Margins.Top = 0
141 Margins.Bottom = 0
142 Align = alTop
143 Alignment = taLeftJustify
144 Caption =
145 '*** Place this code after a template field to allow the screen r' +
146 'eader to continue'
147 TabOrder = 2
148 ShowAccelChar = True
149 end
150 object lblSRStop: TVA508StaticText
151 Name = 'lblSRStop'
152 AlignWithMargins = True
153 Left = 10
154 Top = 15
155 Width = 437
156 Height = 15
157 Margins.Left = 10
158 Margins.Top = 0
159 Margins.Bottom = 0
160 Align = alTop
161 Alignment = taLeftJustify
162 Caption = '** Screen reader will stop speaking at this point'
163 TabOrder = 1
164 ShowAccelChar = True
165 end
166 object pnlSRIntro: TPanel
167 Left = 0
168 Top = 0
169 Width = 450
170 Height = 15
171 Align = alTop
172 BevelOuter = bvNone
173 TabOrder = 0
174 object lblSRIntro1: TVA508StaticText
175 Name = 'lblSRIntro1'
176 AlignWithMargins = True
177 Left = 10
178 Top = 0
179 Width = 127
180 Height = 15
181 Margins.Left = 10
182 Margins.Top = 0
183 Margins.Bottom = 0
184 Align = alLeft
185 Alignment = taLeftJustify
186 Caption = 'Screen Reader Codes'
187 Font.Charset = DEFAULT_CHARSET
188 Font.Color = clWindowText
189 Font.Height = -11
190 Font.Name = 'MS Sans Serif'
191 Font.Style = [fsBold]
192 ParentFont = False
193 TabOrder = 0
194 ShowAccelChar = True
195 end
196 object lblSRIntro2: TVA508StaticText
197 Name = 'lblSRIntro2'
198 Left = 140
199 Top = 0
200 Width = 310
201 Height = 15
202 Align = alClient
203 Alignment = taLeftJustify
204 Caption = '(make templates user friendly for those using screen readers)'
205 TabOrder = 1
206 ShowAccelChar = True
207 end
208 end
209 end
210 inherited amgrMain: TVA508AccessibilityManager
211 Data = (
212 (
213 'Component = pnlBottom'
214 'Status = stsDefault')
215 (
216 'Component = btnCancel'
217 'Status = stsDefault')
218 (
219 'Component = btnInsert'
220 'Status = stsDefault')
221 (
222 'Component = btnPreview'
223 'Status = stsDefault')
224 (
225 'Component = cboObjects'
226 'Status = stsDefault')
227 (
228 'Component = frmTemplateFields'
229 'Status = stsDefault')
230 (
231 'Component = lblReq'
232 'Status = stsDefault')
233 (
234 'Component = pnlBottomSR'
235 'Status = stsDefault')
236 (
237 'Component = lblSRCont2'
238 'Status = stsDefault')
239 (
240 'Component = lblSRCont1'
241 'Status = stsDefault')
242 (
243 'Component = lblSRStop'
244 'Status = stsDefault')
245 (
246 'Component = pnlSRIntro'
247 'Status = stsDefault')
248 (
249 'Component = lblSRIntro1'
250 'Status = stsDefault')
251 (
252 'Component = lblSRIntro2'
253 'Status = stsDefault'))
254 end
255end
Note: See TracBrowser for help on using the repository browser.