source: cprs/trunk/CPRS-Chart/Orders/fOtherSchedule.dfm@ 1224

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

Upgrade to version 27

File size: 9.5 KB
RevLine 
[829]1inherited frmOtherSchedule: TfrmOtherSchedule
[456]2 Left = 544
3 Top = 262
4 Caption = 'Order with schedule '#39'OTHER'#39
5 ClientHeight = 362
[829]6 ClientWidth = 592
[456]7 Constraints.MinHeight = 70
8 Constraints.MinWidth = 280
9 OldCreateOrder = False
10 Position = poOwnerFormCenter
11 OnClose = FormClose
12 OnCreate = FormCreate
[829]13 ExplicitWidth = 600
14 ExplicitHeight = 389
[456]15 PixelsPerInch = 96
16 TextHeight = 13
[829]17 object Splitter1: TSplitter [0]
[456]18 Left = 0
19 Top = 82
[829]20 Width = 592
[456]21 Height = 8
22 Cursor = crVSplit
23 Align = alTop
24 Beveled = True
25 MinSize = 1
[829]26 ExplicitWidth = 369
[456]27 end
[829]28 object Panel1: TPanel [1]
[456]29 Left = 0
30 Top = 0
[829]31 Width = 592
[456]32 Height = 82
33 Align = alTop
34 BorderWidth = 3
35 TabOrder = 0
36 object Image1: TImage
37 Left = 4
38 Top = 4
39 Width = 48
40 Height = 74
41 Align = alLeft
42 AutoSize = True
43 Transparent = True
44 end
45 object memMessage: TMemo
46 Left = 52
47 Top = 4
[829]48 Width = 536
[456]49 Height = 74
50 Align = alClient
51 BevelInner = bvNone
52 BevelOuter = bvNone
53 Color = clBtnFace
54 ReadOnly = True
55 ScrollBars = ssVertical
56 TabOrder = 0
57 end
58 end
[829]59 object Panel3: TPanel [2]
[456]60 Left = 0
61 Top = 90
[829]62 Width = 592
[456]63 Height = 272
64 Align = alClient
65 AutoSize = True
66 TabOrder = 1
67 object GroupBox1: TGroupBox
68 Left = 1
69 Top = 1
70 Width = 176
71 Height = 202
72 Align = alLeft
73 Caption = 'Select Days of Week'
74 TabOrder = 0
75 object cbo7: TCheckBox
76 Tag = 1
77 Left = 86
78 Top = 21
79 Width = 60
80 Height = 12
81 Caption = 'SUN'
82 TabOrder = 0
83 OnClick = cbo7Click
84 end
85 object cbo1: TCheckBox
86 Tag = 2
87 Left = 85
88 Top = 48
89 Width = 60
90 Height = 12
91 Caption = 'MON'
92 TabOrder = 1
93 OnClick = cbo1Click
94 end
95 object cbo2: TCheckBox
96 Tag = 3
97 Left = 85
98 Top = 75
99 Width = 60
100 Height = 12
101 Caption = 'TUE'
102 TabOrder = 2
103 OnClick = cbo2Click
104 end
105 object cbo3: TCheckBox
106 Tag = 4
107 Left = 85
108 Top = 102
109 Width = 60
110 Height = 12
111 Caption = 'WED'
112 TabOrder = 3
113 OnClick = cbo3Click
114 end
115 object cbo4: TCheckBox
116 Tag = 5
117 Left = 85
118 Top = 129
119 Width = 60
120 Height = 12
121 Caption = 'THU'
122 TabOrder = 4
123 OnClick = cbo4Click
124 end
125 object cbo5: TCheckBox
126 Tag = 6
127 Left = 85
128 Top = 156
129 Width = 60
130 Height = 12
131 Caption = 'FRI'
132 TabOrder = 5
133 OnClick = cbo5Click
134 end
135 object cbo6: TCheckBox
136 Tag = 7
137 Left = 85
138 Top = 183
139 Width = 60
140 Height = 12
141 Caption = 'SAT'
142 TabOrder = 6
143 OnClick = cbo6Click
144 end
145 object Button1: TButton
146 Left = 8
147 Top = 64
148 Width = 60
149 Height = 19
150 Caption = 'Everyday'
151 TabOrder = 7
152 OnClick = Button1Click
153 end
154 end
155 object GroupBox2: TGroupBox
156 Left = 180
157 Top = 1
158 Width = 188
159 Height = 202
160 Caption = 'Set Administration Time'
161 TabOrder = 1
162 object lstHour: TListBox
163 Left = 8
164 Top = 16
165 Width = 49
166 Height = 182
167 ItemHeight = 13
168 Items.Strings = (
169 ' 0'
170 ' 1'
171 ' 2'
172 ' 3'
173 ' 4'
174 ' 5'
175 ' 6'
176 ' 7'
177 ' 8'
178 ' 9'
179 '10'
180 '11'
181 '12 --'
182 '13'
183 '14'
184 '15'
185 '16'
186 '17'
187 '18'
188 '19'
189 '20'
190 '21'
191 '22'
192 '23')
193 TabOrder = 0
194 OnClick = lstHourClick
195 end
196 object lstMinute: TListBox
197 Left = 60
198 Top = 16
199 Width = 49
200 Height = 182
201 ItemHeight = 13
202 Items.Strings = (
203 ':00'
204 ':05'
205 ':10'
206 ':15'
207 ':20'
208 ':25'
209 ':30'
210 ':35'
211 ':40'
212 ':45'
213 ':50'
214 ':55')
215 TabOrder = 1
216 OnKeyDown = lstMinuteKeyDown
217 OnMouseUp = lstMinuteMouseUp
218 end
219 object btnRemove: TButton
220 Left = 118
221 Top = 94
222 Width = 60
223 Height = 19
224 Hint = 'Remove the selected time from the Day-of-Week schedule.'
225 Caption = 'Remove'
226 ParentShowHint = False
227 ShowHint = True
228 TabOrder = 2
229 OnClick = btnRemoveClick
230 end
231 object btnAdd: TButton
232 Left = 118
233 Top = 64
234 Width = 60
235 Height = 19
236 Hint = 'Add the selected time to the Day-of-Week schedule'
237 Caption = 'Add'
238 ParentShowHint = False
239 ShowHint = True
240 TabOrder = 3
241 OnClick = btnAddClick
242 end
243 end
244 object Panel4: TPanel
245 Left = 1
246 Top = 203
[829]247 Width = 590
[456]248 Height = 68
249 Align = alBottom
[829]250 TabOrder = 3
[456]251 DesignSize = (
[829]252 590
[456]253 68)
254 object Label1: TLabel
255 Left = 6
256 Top = 16
257 Width = 51
258 Height = 13
259 Caption = 'Schedule :'
260 end
261 object btn0k1: TButton
[829]262 Left = 427
[456]263 Top = 43
264 Width = 75
265 Height = 20
266 Anchors = [akRight, akBottom]
267 Caption = 'OK'
268 TabOrder = 1
269 OnClick = btn0k1Click
270 end
271 object btnCancel: TButton
[829]272 Left = 508
[456]273 Top = 42
274 Width = 75
275 Height = 20
276 Anchors = [akRight, akBottom]
277 Caption = 'Cancel'
278 ModalResult = 2
279 TabOrder = 2
280 OnClick = btnCancelClick
281 end
282 object btnReset: TButton
283 Left = 8
284 Top = 43
285 Width = 75
286 Height = 20
287 Caption = 'Reset'
288 TabOrder = 3
289 OnClick = btnResetClick
290 end
[829]291 object txtSchedule: TEdit
292 Left = 63
293 Top = 6
294 Width = 520
295 Height = 21
296 Color = clInfoBk
297 ReadOnly = True
298 TabOrder = 0
299 end
[456]300 end
[829]301 object GroupBox3: TGroupBox
302 Left = 374
303 Top = -2
304 Width = 211
305 Height = 202
306 Caption = 'Schedule'
307 TabOrder = 2
308 object NSScboSchedule: TORComboBox
309 Left = 5
310 Top = 16
311 Width = 121
312 Height = 180
313 Style = orcsSimple
314 AutoSelect = True
315 Color = clWindow
316 DropDownCount = 8
317 ItemHeight = 13
318 ItemTipColor = clWindow
319 ItemTipEnable = True
320 ListItemsOnly = False
321 LongList = False
322 LookupPiece = 1
323 MaxLength = 0
324 Pieces = '1'
325 Sorted = False
326 SynonymChars = '<>'
327 TabOrder = 0
328 CharsNeedMatch = 1
329 UniqueAutoComplete = True
330 end
331 object btnSchAdd: TButton
332 Left = 132
333 Top = 64
334 Width = 60
335 Height = 19
336 Caption = 'Add'
337 TabOrder = 1
338 OnClick = btnSchAddClick
339 end
340 object btnSchRemove: TButton
341 Left = 132
342 Top = 94
343 Width = 60
344 Height = 19
345 Caption = 'Remove'
346 TabOrder = 2
347 OnClick = btnSchRemoveClick
348 end
349 end
[456]350 end
[829]351 inherited amgrMain: TVA508AccessibilityManager
352 Data = (
353 (
354 'Component = Panel1'
355 'Status = stsDefault')
356 (
357 'Component = memMessage'
358 'Status = stsDefault')
359 (
360 'Component = Panel3'
361 'Status = stsDefault')
362 (
363 'Component = GroupBox1'
364 'Status = stsDefault')
365 (
366 'Component = cbo7'
367 'Status = stsDefault')
368 (
369 'Component = cbo1'
370 'Status = stsDefault')
371 (
372 'Component = cbo2'
373 'Status = stsDefault')
374 (
375 'Component = cbo3'
376 'Status = stsDefault')
377 (
378 'Component = cbo4'
379 'Status = stsDefault')
380 (
381 'Component = cbo5'
382 'Status = stsDefault')
383 (
384 'Component = cbo6'
385 'Status = stsDefault')
386 (
387 'Component = Button1'
388 'Status = stsDefault')
389 (
390 'Component = GroupBox2'
391 'Status = stsDefault')
392 (
393 'Component = lstHour'
394 'Status = stsDefault')
395 (
396 'Component = lstMinute'
397 'Status = stsDefault')
398 (
399 'Component = btnRemove'
400 'Status = stsDefault')
401 (
402 'Component = btnAdd'
403 'Status = stsDefault')
404 (
405 'Component = Panel4'
406 'Status = stsDefault')
407 (
408 'Component = btn0k1'
409 'Status = stsDefault')
410 (
411 'Component = btnCancel'
412 'Status = stsDefault')
413 (
414 'Component = btnReset'
415 'Status = stsDefault')
416 (
417 'Component = GroupBox3'
418 'Status = stsDefault')
419 (
420 'Component = NSScboSchedule'
421 'Status = stsDefault')
422 (
423 'Component = btnSchAdd'
424 'Status = stsDefault')
425 (
426 'Component = btnSchRemove'
427 'Status = stsDefault')
428 (
429 'Component = frmOtherSchedule'
430 'Status = stsDefault')
431 (
432 'Component = txtSchedule'
433 'Status = stsDefault'))
434 end
[456]435end
Note: See TracBrowser for help on using the repository browser.