source: cprs/trunk/CPRS-Chart/Consults/fConsultBD.dfm@ 1697

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

Upgrade to version 27

File size: 2.4 KB
RevLine 
[829]1inherited frmConsultsByDate: TfrmConsultsByDate
[456]2 Left = 372
3 Top = 217
4 BorderIcons = []
5 Caption = 'List Consults by Date Range'
[829]6 ClientHeight = 151
7 ClientWidth = 251
[456]8 OldCreateOrder = True
9 Position = poScreenCenter
[829]10 ExplicitWidth = 259
11 ExplicitHeight = 178
[456]12 PixelsPerInch = 96
13 TextHeight = 13
[829]14 object pnlBase: TORAutoPanel [0]
[456]15 Left = 0
16 Top = 0
17 Width = 251
18 Height = 151
19 Align = alClient
20 BevelOuter = bvNone
21 TabOrder = 0
22 object lblBeginDate: TLabel
23 Left = 8
24 Top = 8
25 Width = 73
26 Height = 13
27 Caption = 'Beginning Date'
28 end
29 object lblEndDate: TLabel
30 Left = 8
31 Top = 51
32 Width = 59
33 Height = 13
34 Caption = 'Ending Date'
35 end
36 object calBeginDate: TORDateBox
37 Left = 8
38 Top = 22
39 Width = 155
40 Height = 21
41 TabOrder = 0
42 DateOnly = False
43 RequireTime = False
44 Caption = 'Beginning Date'
45 end
46 object calEndDate: TORDateBox
47 Left = 8
48 Top = 65
49 Width = 155
50 Height = 21
51 TabOrder = 1
52 DateOnly = False
53 RequireTime = False
54 Caption = 'Ending Date'
55 end
56 object radSort: TRadioGroup
57 Left = 8
58 Top = 94
59 Width = 155
60 Height = 49
61 Caption = 'Sort Order'
62 Items.Strings = (
63 '&Ascending (oldest first)'
64 '&Descending (newest first)')
65 TabOrder = 2
66 end
67 object cmdOK: TButton
68 Left = 171
69 Top = 95
70 Width = 72
71 Height = 21
72 Caption = 'OK'
73 Default = True
74 TabOrder = 3
75 OnClick = cmdOKClick
76 end
77 object cmdCancel: TButton
78 Left = 171
79 Top = 122
80 Width = 72
81 Height = 21
82 Cancel = True
83 Caption = 'Cancel'
84 TabOrder = 4
85 OnClick = cmdCancelClick
86 end
87 end
[829]88 inherited amgrMain: TVA508AccessibilityManager
89 Data = (
90 (
91 'Component = pnlBase'
92 'Status = stsDefault')
93 (
94 'Component = calBeginDate'
95 'Status = stsDefault')
96 (
97 'Component = calEndDate'
98 'Status = stsDefault')
99 (
100 'Component = radSort'
101 'Status = stsDefault')
102 (
103 'Component = cmdOK'
104 'Status = stsDefault')
105 (
106 'Component = cmdCancel'
107 'Status = stsDefault')
108 (
109 'Component = frmConsultsByDate'
110 'Status = stsDefault'))
111 end
[456]112end
Note: See TracBrowser for help on using the repository browser.