Last change
on this file since 1312 was 830, checked in by Kevin Toppenberg, 14 years ago |
Upgrading to version 27
|
File size:
2.6 KB
|
Line | |
---|
1 | inherited frmPtCWAD: TfrmPtCWAD
|
---|
2 | Left = 245
|
---|
3 | Top = 268
|
---|
4 | BorderIcons = [biSystemMenu]
|
---|
5 | Caption = 'Patient Postings'
|
---|
6 | ClientHeight = 275
|
---|
7 | ClientWidth = 435
|
---|
8 | Position = poScreenCenter
|
---|
9 | OnCreate = FormCreate
|
---|
10 | OnKeyUp = FormKeyUp
|
---|
11 | ExplicitWidth = 443
|
---|
12 | ExplicitHeight = 302
|
---|
13 | PixelsPerInch = 96
|
---|
14 | TextHeight = 13
|
---|
15 | object lblNotes: TOROffsetLabel [0]
|
---|
16 | Left = 0
|
---|
17 | Top = 127
|
---|
18 | Width = 435
|
---|
19 | Height = 24
|
---|
20 | Align = alTop
|
---|
21 | Caption = 'Crisis Notes, Warning Notes, Directives'
|
---|
22 | HorzOffset = 2
|
---|
23 | Transparent = False
|
---|
24 | VertOffset = 6
|
---|
25 | WordWrap = False
|
---|
26 | end
|
---|
27 | object lblAllergies: TOROffsetLabel [1]
|
---|
28 | Left = 0
|
---|
29 | Top = 0
|
---|
30 | Width = 435
|
---|
31 | Height = 21
|
---|
32 | Align = alTop
|
---|
33 | Caption =
|
---|
34 | 'Allergies Severity' +
|
---|
35 | ' Signs / Symptoms'
|
---|
36 | HorzOffset = 2
|
---|
37 | Transparent = False
|
---|
38 | VertOffset = 6
|
---|
39 | WordWrap = False
|
---|
40 | end
|
---|
41 | object lstAllergies: TORListBox [2]
|
---|
42 | Left = 0
|
---|
43 | Top = 21
|
---|
44 | Width = 435
|
---|
45 | Height = 106
|
---|
46 | Align = alTop
|
---|
47 | ItemHeight = 13
|
---|
48 | ParentShowHint = False
|
---|
49 | ShowHint = True
|
---|
50 | TabOrder = 0
|
---|
51 | OnClick = lstAllergiesClick
|
---|
52 | Caption = 'Allergies'
|
---|
53 | ItemTipColor = clWindow
|
---|
54 | LongList = False
|
---|
55 | Pieces = '2,3,4'
|
---|
56 | TabPositions = '30,45'
|
---|
57 | end
|
---|
58 | object lstNotes: TORListBox [3]
|
---|
59 | Left = 0
|
---|
60 | Top = 151
|
---|
61 | Width = 435
|
---|
62 | Height = 97
|
---|
63 | Align = alClient
|
---|
64 | ItemHeight = 13
|
---|
65 | ParentShowHint = False
|
---|
66 | ShowHint = True
|
---|
67 | TabOrder = 1
|
---|
68 | OnClick = lstNotesClick
|
---|
69 | Caption = 'Crisis Notes, Warning Notes, Directives'
|
---|
70 | ItemTipColor = clWindow
|
---|
71 | LongList = False
|
---|
72 | Pieces = '2,3'
|
---|
73 | TabPositions = '20'
|
---|
74 | end
|
---|
75 | object pnlBottom: TPanel [4]
|
---|
76 | Left = 0
|
---|
77 | Top = 248
|
---|
78 | Width = 435
|
---|
79 | Height = 27
|
---|
80 | Align = alBottom
|
---|
81 | BevelOuter = bvNone
|
---|
82 | TabOrder = 4
|
---|
83 | DesignSize = (
|
---|
84 | 435
|
---|
85 | 27)
|
---|
86 | object btnClose: TButton
|
---|
87 | Left = 359
|
---|
88 | Top = 4
|
---|
89 | Width = 75
|
---|
90 | Height = 21
|
---|
91 | Anchors = [akTop, akRight]
|
---|
92 | Cancel = True
|
---|
93 | Caption = 'Close'
|
---|
94 | TabOrder = 0
|
---|
95 | OnClick = btnCloseClick
|
---|
96 | end
|
---|
97 | end
|
---|
98 | inherited amgrMain: TVA508AccessibilityManager
|
---|
99 | Data = (
|
---|
100 | (
|
---|
101 | 'Component = lstAllergies'
|
---|
102 | 'Status = stsDefault')
|
---|
103 | (
|
---|
104 | 'Component = lstNotes'
|
---|
105 | 'Status = stsDefault')
|
---|
106 | (
|
---|
107 | 'Component = pnlBottom'
|
---|
108 | 'Status = stsDefault')
|
---|
109 | (
|
---|
110 | 'Component = btnClose'
|
---|
111 | 'Status = stsDefault')
|
---|
112 | (
|
---|
113 | 'Component = frmPtCWAD'
|
---|
114 | 'Status = stsDefault'))
|
---|
115 | end
|
---|
116 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.