1 | object frmRemDlg: TfrmRemDlg
|
---|
2 | Left = 256
|
---|
3 | Top = 161
|
---|
4 | Width = 545
|
---|
5 | Height = 407
|
---|
6 | HelpContext = 11100
|
---|
7 | VertScrollBar.Range = 162
|
---|
8 | AutoScroll = False
|
---|
9 | BorderIcons = [biSystemMenu]
|
---|
10 | Caption = 'Reminder Dialog'
|
---|
11 | Color = clBtnFace
|
---|
12 | Constraints.MinHeight = 250
|
---|
13 | Constraints.MinWidth = 250
|
---|
14 | Font.Charset = DEFAULT_CHARSET
|
---|
15 | Font.Color = clWindowText
|
---|
16 | Font.Height = -11
|
---|
17 | Font.Name = 'MS Sans Serif'
|
---|
18 | Font.Style = []
|
---|
19 | FormStyle = fsStayOnTop
|
---|
20 | OldCreateOrder = False
|
---|
21 | OnClose = FormClose
|
---|
22 | OnCloseQuery = FormCloseQuery
|
---|
23 | OnCreate = FormCreate
|
---|
24 | OnDestroy = FormDestroy
|
---|
25 | OnShow = FormShow
|
---|
26 | PixelsPerInch = 96
|
---|
27 | TextHeight = 13
|
---|
28 | object splTxtData: TSplitter
|
---|
29 | Left = 0
|
---|
30 | Top = 218
|
---|
31 | Width = 537
|
---|
32 | Height = 3
|
---|
33 | Cursor = crVSplit
|
---|
34 | Align = alBottom
|
---|
35 | end
|
---|
36 | object Label1: TLabel
|
---|
37 | Left = 176
|
---|
38 | Top = 368
|
---|
39 | Width = 32
|
---|
40 | Height = 13
|
---|
41 | Caption = 'Label1'
|
---|
42 | end
|
---|
43 | object lblFootnotes: TStaticText
|
---|
44 | Left = 0
|
---|
45 | Top = 365
|
---|
46 | Width = 537
|
---|
47 | Height = 15
|
---|
48 | Align = alBottom
|
---|
49 | AutoSize = False
|
---|
50 | Caption = ' * Indicates a Required Field'
|
---|
51 | TabOrder = 3
|
---|
52 | end
|
---|
53 | object sb1: TScrollBox
|
---|
54 | Left = 0
|
---|
55 | Top = 0
|
---|
56 | Width = 537
|
---|
57 | Height = 218
|
---|
58 | HorzScrollBar.Tracking = True
|
---|
59 | VertScrollBar.Tracking = True
|
---|
60 | Align = alClient
|
---|
61 | Font.Charset = ANSI_CHARSET
|
---|
62 | Font.Color = clWindowText
|
---|
63 | Font.Height = -11
|
---|
64 | Font.Name = 'Courier New'
|
---|
65 | Font.Style = []
|
---|
66 | ParentFont = False
|
---|
67 | TabOrder = 0
|
---|
68 | Visible = False
|
---|
69 | OnResize = sbResize
|
---|
70 | end
|
---|
71 | object pnlBottom: TPanel
|
---|
72 | Left = 0
|
---|
73 | Top = 221
|
---|
74 | Width = 537
|
---|
75 | Height = 144
|
---|
76 | Align = alBottom
|
---|
77 | TabOrder = 2
|
---|
78 | object splText: TSplitter
|
---|
79 | Left = 1
|
---|
80 | Top = 94
|
---|
81 | Width = 535
|
---|
82 | Height = 3
|
---|
83 | Cursor = crVSplit
|
---|
84 | Align = alBottom
|
---|
85 | end
|
---|
86 | object reData: TRichEdit
|
---|
87 | Left = 1
|
---|
88 | Top = 97
|
---|
89 | Width = 535
|
---|
90 | Height = 46
|
---|
91 | Align = alBottom
|
---|
92 | Color = clCream
|
---|
93 | ReadOnly = True
|
---|
94 | ScrollBars = ssVertical
|
---|
95 | TabOrder = 2
|
---|
96 | WantReturns = False
|
---|
97 | end
|
---|
98 | object reText: TRichEdit
|
---|
99 | Left = 1
|
---|
100 | Top = 25
|
---|
101 | Width = 535
|
---|
102 | Height = 69
|
---|
103 | Align = alClient
|
---|
104 | Color = clCream
|
---|
105 | Font.Charset = ANSI_CHARSET
|
---|
106 | Font.Color = clWindowText
|
---|
107 | Font.Height = -11
|
---|
108 | Font.Name = 'Courier New'
|
---|
109 | Font.Style = []
|
---|
110 | ParentFont = False
|
---|
111 | ReadOnly = True
|
---|
112 | ScrollBars = ssBoth
|
---|
113 | TabOrder = 1
|
---|
114 | WantReturns = False
|
---|
115 | WordWrap = False
|
---|
116 | end
|
---|
117 | object pnlButtons: TORAutoPanel
|
---|
118 | Left = 1
|
---|
119 | Top = 1
|
---|
120 | Width = 535
|
---|
121 | Height = 24
|
---|
122 | Align = alTop
|
---|
123 | BevelOuter = bvNone
|
---|
124 | ParentShowHint = False
|
---|
125 | ShowHint = True
|
---|
126 | TabOrder = 0
|
---|
127 | object btnClear: TButton
|
---|
128 | Left = 2
|
---|
129 | Top = 2
|
---|
130 | Width = 66
|
---|
131 | Height = 21
|
---|
132 | Hint = 'Clear Reminder Resolutions for this Reminder'
|
---|
133 | Caption = 'Clear'
|
---|
134 | TabOrder = 0
|
---|
135 | OnClick = btnClearClick
|
---|
136 | end
|
---|
137 | object btnBack: TButton
|
---|
138 | Left = 263
|
---|
139 | Top = 2
|
---|
140 | Width = 66
|
---|
141 | Height = 21
|
---|
142 | Hint = 'Go back to the Previous Reminder Dialog'
|
---|
143 | Caption = '< Back'
|
---|
144 | TabOrder = 3
|
---|
145 | OnClick = btnBackClick
|
---|
146 | end
|
---|
147 | object btnCancel: TButton
|
---|
148 | Left = 467
|
---|
149 | Top = 2
|
---|
150 | Width = 66
|
---|
151 | Height = 21
|
---|
152 | Hint = 'Cancel All Reminder Dialog Processing'
|
---|
153 | Cancel = True
|
---|
154 | Caption = 'Cancel'
|
---|
155 | TabOrder = 6
|
---|
156 | OnClick = btnCancelClick
|
---|
157 | end
|
---|
158 | object btnNext: TButton
|
---|
159 | Left = 331
|
---|
160 | Top = 2
|
---|
161 | Width = 66
|
---|
162 | Height = 21
|
---|
163 | Hint = 'Go on to the Next Reminder Dialog'
|
---|
164 | Caption = 'Next >'
|
---|
165 | TabOrder = 4
|
---|
166 | OnClick = btnNextClick
|
---|
167 | end
|
---|
168 | object btnFinish: TButton
|
---|
169 | Left = 399
|
---|
170 | Top = 2
|
---|
171 | Width = 66
|
---|
172 | Height = 21
|
---|
173 | Hint = 'Finish Processing'
|
---|
174 | Caption = 'Finish'
|
---|
175 | TabOrder = 5
|
---|
176 | OnClick = btnFinishClick
|
---|
177 | end
|
---|
178 | object btnClinMaint: TButton
|
---|
179 | Left = 70
|
---|
180 | Top = 2
|
---|
181 | Width = 105
|
---|
182 | Height = 21
|
---|
183 | Hint = 'View the Clinical Maintenance Component'
|
---|
184 | Caption = 'Clinical &Maint'
|
---|
185 | TabOrder = 1
|
---|
186 | OnClick = btnClinMaintClick
|
---|
187 | end
|
---|
188 | object btnVisit: TButton
|
---|
189 | Left = 177
|
---|
190 | Top = 2
|
---|
191 | Width = 84
|
---|
192 | Height = 21
|
---|
193 | Caption = '&Visit Info'
|
---|
194 | TabOrder = 2
|
---|
195 | OnClick = btnVisitClick
|
---|
196 | end
|
---|
197 | end
|
---|
198 | end
|
---|
199 | object sb2: TScrollBox
|
---|
200 | Left = 0
|
---|
201 | Top = 0
|
---|
202 | Width = 537
|
---|
203 | Height = 218
|
---|
204 | HorzScrollBar.Tracking = True
|
---|
205 | VertScrollBar.Tracking = True
|
---|
206 | Align = alClient
|
---|
207 | Font.Charset = ANSI_CHARSET
|
---|
208 | Font.Color = clWindowText
|
---|
209 | Font.Height = -11
|
---|
210 | Font.Name = 'Courier New'
|
---|
211 | Font.Style = []
|
---|
212 | ParentFont = False
|
---|
213 | TabOrder = 1
|
---|
214 | OnResize = sbResize
|
---|
215 | end
|
---|
216 | end
|
---|