Line | |
---|
1 | inherited frmODChild: TfrmODChild
|
---|
2 | Left = 433
|
---|
3 | Top = 271
|
---|
4 | Caption = 'Associated Complex Orders'
|
---|
5 | ClientHeight = 426
|
---|
6 | ClientWidth = 504
|
---|
7 | OldCreateOrder = False
|
---|
8 | Position = poMainFormCenter
|
---|
9 | OnCreate = FormCreate
|
---|
10 | ExplicitWidth = 512
|
---|
11 | ExplicitHeight = 453
|
---|
12 | PixelsPerInch = 96
|
---|
13 | TextHeight = 13
|
---|
14 | object lblWarning: TLabel [0]
|
---|
15 | Left = 0
|
---|
16 | Top = 0
|
---|
17 | Width = 504
|
---|
18 | Height = 59
|
---|
19 | Align = alTop
|
---|
20 | AutoSize = False
|
---|
21 | Caption =
|
---|
22 | 'You have requested to discontinue a medication order which was e' +
|
---|
23 | 'ntered as part of a complex order. The following are the orders ' +
|
---|
24 | 'associated with the same complex order. Do you want to dicsconti' +
|
---|
25 | 'nue all of these orders?'
|
---|
26 | WordWrap = True
|
---|
27 | end
|
---|
28 | object Panel1: TPanel [1]
|
---|
29 | Left = 0
|
---|
30 | Top = 59
|
---|
31 | Width = 504
|
---|
32 | Height = 326
|
---|
33 | Align = alClient
|
---|
34 | BevelOuter = bvNone
|
---|
35 | BorderWidth = 3
|
---|
36 | BorderStyle = bsSingle
|
---|
37 | TabOrder = 0
|
---|
38 | object lstODComplex: TListBox
|
---|
39 | Left = 3
|
---|
40 | Top = 3
|
---|
41 | Width = 494
|
---|
42 | Height = 316
|
---|
43 | Style = lbOwnerDrawVariable
|
---|
44 | Align = alClient
|
---|
45 | ItemHeight = 16
|
---|
46 | TabOrder = 0
|
---|
47 | OnDrawItem = lstODComplexDrawItem
|
---|
48 | OnMeasureItem = lstODComplexMeasureItem
|
---|
49 | end
|
---|
50 | end
|
---|
51 | object Panel2: TPanel [2]
|
---|
52 | Left = 0
|
---|
53 | Top = 385
|
---|
54 | Width = 504
|
---|
55 | Height = 41
|
---|
56 | Align = alBottom
|
---|
57 | TabOrder = 1
|
---|
58 | DesignSize = (
|
---|
59 | 504
|
---|
60 | 41)
|
---|
61 | object btnOK: TButton
|
---|
62 | Left = 332
|
---|
63 | Top = 12
|
---|
64 | Width = 75
|
---|
65 | Height = 21
|
---|
66 | Anchors = [akRight, akBottom]
|
---|
67 | Caption = 'OK'
|
---|
68 | TabOrder = 0
|
---|
69 | OnClick = btnOKClick
|
---|
70 | end
|
---|
71 | object btnCancel: TButton
|
---|
72 | Left = 416
|
---|
73 | Top = 12
|
---|
74 | Width = 75
|
---|
75 | Height = 21
|
---|
76 | Anchors = [akRight, akBottom]
|
---|
77 | Caption = 'Cancel'
|
---|
78 | TabOrder = 1
|
---|
79 | OnClick = btnCancelClick
|
---|
80 | end
|
---|
81 | end
|
---|
82 | inherited amgrMain: TVA508AccessibilityManager
|
---|
83 | Data = (
|
---|
84 | (
|
---|
85 | 'Component = Panel1'
|
---|
86 | 'Status = stsDefault')
|
---|
87 | (
|
---|
88 | 'Component = lstODComplex'
|
---|
89 | 'Status = stsDefault')
|
---|
90 | (
|
---|
91 | 'Component = Panel2'
|
---|
92 | 'Status = stsDefault')
|
---|
93 | (
|
---|
94 | 'Component = btnOK'
|
---|
95 | 'Status = stsDefault')
|
---|
96 | (
|
---|
97 | 'Component = btnCancel'
|
---|
98 | 'Status = stsDefault')
|
---|
99 | (
|
---|
100 | 'Component = frmODChild'
|
---|
101 | 'Status = stsDefault'))
|
---|
102 | end
|
---|
103 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.