source: cprs/branches/foia-cprs/CPRS-Chart/fReports.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: 9.8 KB
Line 
1inherited frmReports: TfrmReports
2 Left = 215
3 Top = 126
4 Width = 786
5 Height = 377
6 HelpContext = 9000
7 Caption = 'Reports Page'
8 HelpFile = 'qnoback'
9 OnDestroy = FormDestroy
10 OnShow = FormShow
11 PixelsPerInch = 96
12 TextHeight = 13
13 inherited shpPageBottom: TShape
14 Top = 340
15 Width = 778
16 Height = 10
17 end
18 inherited sptHorz: TSplitter
19 Left = 119
20 Height = 340
21 end
22 inherited pnlLeft: TPanel
23 Width = 119
24 Height = 340
25 object Splitter1: TSplitter
26 Left = 0
27 Top = 91
28 Width = 119
29 Height = 10
30 Cursor = crVSplit
31 Align = alBottom
32 OnCanResize = Splitter1CanResize
33 end
34 object pnlLefTop: TPanel
35 Left = 0
36 Top = 0
37 Width = 119
38 Height = 91
39 Align = alClient
40 BevelOuter = bvNone
41 Constraints.MinWidth = 30
42 TabOrder = 0
43 object lblTypes: TOROffsetLabel
44 Left = 0
45 Top = 0
46 Width = 119
47 Height = 19
48 Align = alTop
49 Caption = 'Available Reports'
50 HorzOffset = 3
51 Transparent = True
52 VertOffset = 6
53 WordWrap = False
54 end
55 object tvReports: TORTreeView
56 Left = 0
57 Top = 19
58 Width = 119
59 Height = 72
60 Align = alClient
61 HideSelection = False
62 Indent = 18
63 ReadOnly = True
64 TabOrder = 0
65 OnClick = tvReportsClick
66 OnCollapsing = tvReportsCollapsing
67 OnExpanding = tvReportsExpanding
68 OnKeyDown = tvReportsKeyDown
69 Caption = 'Available Reports'
70 NodePiece = 0
71 end
72 end
73 object pnlLeftBottom: TPanel
74 Left = 0
75 Top = 201
76 Width = 119
77 Height = 139
78 Align = alBottom
79 BevelOuter = bvNone
80 TabOrder = 1
81 object lblQualifier: TOROffsetLabel
82 Left = 0
83 Top = 0
84 Width = 119
85 Height = 20
86 Align = alTop
87 HorzOffset = 3
88 Transparent = True
89 VertOffset = 4
90 WordWrap = False
91 end
92 object lblHeaders: TLabel
93 Left = 0
94 Top = 20
95 Width = 119
96 Height = 13
97 Align = alTop
98 Caption = 'Headings'
99 Transparent = True
100 Visible = False
101 end
102 object lstHeaders: TORListBox
103 Left = 0
104 Top = 33
105 Width = 119
106 Height = 106
107 Align = alClient
108 ItemHeight = 13
109 ParentShowHint = False
110 ShowHint = True
111 TabOrder = 0
112 Visible = False
113 OnClick = lstHeadersClick
114 Caption = 'Headings'
115 ItemTipColor = clWindow
116 LongList = False
117 Pieces = '2'
118 end
119 object lstQualifier: TORListBox
120 Left = 0
121 Top = 33
122 Width = 119
123 Height = 106
124 Style = lbOwnerDrawFixed
125 Align = alClient
126 ItemHeight = 13
127 ParentShowHint = False
128 ShowHint = True
129 TabOrder = 1
130 OnClick = lstQualifierClick
131 OnDrawItem = lstQualifierDrawItem
132 ItemTipColor = clWindow
133 LongList = False
134 Pieces = '2,3'
135 TabPositions = '10'
136 end
137 end
138 object pnlProcedures: TPanel
139 Left = 0
140 Top = 101
141 Width = 119
142 Height = 100
143 Align = alBottom
144 BevelOuter = bvNone
145 TabOrder = 2
146 object lblProcedures: TOROffsetLabel
147 Left = 0
148 Top = 0
149 Width = 119
150 Height = 15
151 Align = alTop
152 Caption = 'Radiology Procedures'
153 HorzOffset = 2
154 Transparent = False
155 VertOffset = 2
156 WordWrap = False
157 end
158 object tvProcedures: TORTreeView
159 Left = 0
160 Top = 15
161 Width = 119
162 Height = 85
163 Align = alClient
164 HideSelection = False
165 Indent = 19
166 ReadOnly = True
167 TabOrder = 0
168 OnChange = tvProceduresChange
169 OnClick = tvProceduresClick
170 OnCollapsing = tvProceduresCollapsing
171 OnExpanding = tvProceduresExpanding
172 OnKeyDown = tvProceduresKeyDown
173 Caption = 'tvProcedures'
174 NodePiece = 0
175 end
176 end
177 end
178 inherited pnlRight: TPanel
179 Left = 123
180 Width = 655
181 Height = 340
182 object sptHorzRight: TSplitter
183 Left = 0
184 Top = 177
185 Width = 655
186 Height = 4
187 Cursor = crVSplit
188 Align = alTop
189 Visible = False
190 OnCanResize = sptHorzRightCanResize
191 end
192 object pnlRightTop: TPanel
193 Left = 0
194 Top = 0
195 Width = 655
196 Height = 57
197 Align = alTop
198 BevelOuter = bvNone
199 TabOrder = 0
200 object lblTitle: TOROffsetLabel
201 Left = 0
202 Top = 17
203 Width = 655
204 Height = 25
205 Align = alTop
206 HorzOffset = 3
207 Transparent = True
208 VertOffset = 6
209 WordWrap = False
210 end
211 object lblProcTypeMsg: TOROffsetLabel
212 Left = 0
213 Top = 0
214 Width = 655
215 Height = 17
216 Align = alTop
217 HorzOffset = 3
218 Transparent = False
219 VertOffset = 2
220 WordWrap = False
221 end
222 object TabControl1: TTabControl
223 Left = 0
224 Top = 40
225 Width = 655
226 Height = 17
227 Align = alBottom
228 HotTrack = True
229 TabOrder = 0
230 TabStop = False
231 Visible = False
232 OnChange = TabControl1Change
233 end
234 end
235 object pnlRightBottom: TPanel
236 Left = 0
237 Top = 181
238 Width = 655
239 Height = 159
240 Align = alClient
241 TabOrder = 2
242 object Memo1: TMemo
243 Left = 1
244 Top = 1
245 Width = 653
246 Height = 30
247 TabStop = False
248 Align = alTop
249 Font.Charset = ANSI_CHARSET
250 Font.Color = clWindowText
251 Font.Height = -12
252 Font.Name = 'Courier New'
253 Font.Style = []
254 ParentFont = False
255 ScrollBars = ssVertical
256 TabOrder = 0
257 Visible = False
258 WantTabs = True
259 OnKeyUp = Memo1KeyUp
260 end
261 object WebBrowser1: TWebBrowser
262 Left = 1
263 Top = 31
264 Width = 653
265 Height = 127
266 TabStop = False
267 Align = alClient
268 TabOrder = 1
269 OnDocumentComplete = WebBrowser1DocumentComplete
270 ControlData = {
271 4C0000007D430000200D00000000000000000000000000000000000000000000
272 000000004C000000000000000000000001000000E0D057007335CF11AE690800
273 2B2E126208000000000000004C0000000114020000000000C000000000000046
274 8000000000000000000000000000000000000000000000000000000000000000
275 00000000000000000100000000000000000000000000000000000000}
276 end
277 object memText: TRichEdit
278 Left = 1
279 Top = 31
280 Width = 653
281 Height = 127
282 Align = alClient
283 Color = clCream
284 Font.Charset = ANSI_CHARSET
285 Font.Color = clWindowText
286 Font.Height = -12
287 Font.Name = 'Courier New'
288 Font.Style = []
289 ParentFont = False
290 PlainText = True
291 PopupMenu = PopupMenu1
292 ReadOnly = True
293 ScrollBars = ssBoth
294 TabOrder = 2
295 WantReturns = False
296 WordWrap = False
297 end
298 end
299 object pnlRightMiddle: TPanel
300 Left = 0
301 Top = 57
302 Width = 655
303 Height = 120
304 Align = alTop
305 TabOrder = 1
306 Visible = False
307 object lvReports: TCaptionListView
308 Left = 1
309 Top = 1
310 Width = 653
311 Height = 118
312 Hint = 'To sort, click on column headers|'
313 Align = alClient
314 Columns = <>
315 Constraints.MinHeight = 50
316 HideSelection = False
317 MultiSelect = True
318 ReadOnly = True
319 RowSelect = True
320 ParentShowHint = False
321 PopupMenu = PopupMenu2
322 ShowHint = True
323 TabOrder = 0
324 ViewStyle = vsReport
325 OnColumnClick = lvReportsColumnClick
326 OnCompare = lvReportsCompare
327 OnKeyUp = lvReportsKeyUp
328 OnSelectItem = lvReportsSelectItem
329 end
330 end
331 end
332 object PopupMenu1: TPopupMenu
333 OnPopup = PopupMenu1Popup
334 Left = 229
335 Top = 176
336 object Print2: TMenuItem
337 Caption = 'Print'
338 ShortCut = 16464
339 OnClick = Print2Click
340 end
341 object Copy2: TMenuItem
342 Caption = 'Copy'
343 ShortCut = 16451
344 OnClick = Copy2Click
345 end
346 object SelectAll2: TMenuItem
347 Caption = 'Select All'
348 ShortCut = 16449
349 OnClick = SelectAll2Click
350 end
351 object GotoTop1: TMenuItem
352 Caption = 'Go to Top'
353 Enabled = False
354 OnClick = GotoTop1Click
355 end
356 object GotoBottom1: TMenuItem
357 Caption = 'Go to Bottom'
358 OnClick = GotoBottom1Click
359 end
360 object FreezeText1: TMenuItem
361 Caption = 'Freeze Text'
362 Enabled = False
363 OnClick = FreezeText1Click
364 end
365 object UnFreezeText1: TMenuItem
366 Caption = 'Un-Freeze Text'
367 Enabled = False
368 OnClick = UnFreezeText1Click
369 end
370 end
371 object calApptRng: TORDateRangeDlg
372 DateOnly = False
373 Instruction = 'Enter a date range -'
374 LabelStart = 'Begin Date'
375 LabelStop = 'End Date'
376 RequireTime = False
377 Format = 'mmm d,yy@hh:nn'
378 Left = 325
379 Top = 176
380 end
381 object Timer1: TTimer
382 Enabled = False
383 OnTimer = Timer1Timer
384 Left = 389
385 Top = 176
386 end
387 object PopupMenu2: TPopupMenu
388 Left = 267
389 Top = 174
390 object Print1: TMenuItem
391 Caption = 'Print'
392 ShortCut = 16464
393 OnClick = Print1Click
394 end
395 object Copy1: TMenuItem
396 Caption = 'Copy Data From Table'
397 ShortCut = 16451
398 OnClick = Copy1Click
399 end
400 object SelectAll1: TMenuItem
401 Caption = 'Select All From Table'
402 ShortCut = 16449
403 OnClick = SelectAll1Click
404 end
405 end
406end
Note: See TracBrowser for help on using the repository browser.