1 | object frmFlags: TfrmFlags
|
---|
2 | Left = 210
|
---|
3 | Top = 169
|
---|
4 | Width = 505
|
---|
5 | Height = 498
|
---|
6 | VertScrollBar.Range = 116
|
---|
7 | AutoScroll = False
|
---|
8 | Caption = 'Patient Record Flags'
|
---|
9 | Color = clBtnFace
|
---|
10 | Font.Charset = DEFAULT_CHARSET
|
---|
11 | Font.Color = clWindowText
|
---|
12 | Font.Height = -11
|
---|
13 | Font.Name = 'MS Sans Serif'
|
---|
14 | Font.Style = []
|
---|
15 | OldCreateOrder = False
|
---|
16 | Position = poMainFormCenter
|
---|
17 | OnClose = FormClose
|
---|
18 | OnCreate = FormCreate
|
---|
19 | OnDestroy = FormDestroy
|
---|
20 | OnKeyDown = FormKeyDown
|
---|
21 | OnShow = FormShow
|
---|
22 | PixelsPerInch = 96
|
---|
23 | TextHeight = 13
|
---|
24 | object Splitter1: TSplitter
|
---|
25 | Left = 0
|
---|
26 | Top = 80
|
---|
27 | Width = 497
|
---|
28 | Height = 5
|
---|
29 | Align = alNone
|
---|
30 | end
|
---|
31 | object Splitter2: TSplitter
|
---|
32 | Left = 0
|
---|
33 | Top = 308
|
---|
34 | Width = 497
|
---|
35 | Height = 4
|
---|
36 | Cursor = crVSplit
|
---|
37 | Align = alBottom
|
---|
38 | MinSize = 45
|
---|
39 | end
|
---|
40 | object pnlTop: TORAutoPanel
|
---|
41 | Left = 0
|
---|
42 | Top = 0
|
---|
43 | Width = 497
|
---|
44 | Height = 80
|
---|
45 | Align = alTop
|
---|
46 | Constraints.MinHeight = 40
|
---|
47 | Constraints.MinWidth = 300
|
---|
48 | TabOrder = 0
|
---|
49 | object lblFlags: TLabel
|
---|
50 | Left = 1
|
---|
51 | Top = 1
|
---|
52 | Width = 495
|
---|
53 | Height = 13
|
---|
54 | Align = alTop
|
---|
55 | Caption = 'Active Flag'
|
---|
56 | Layout = tlCenter
|
---|
57 | end
|
---|
58 | object lstFlags: TORListBox
|
---|
59 | Left = 1
|
---|
60 | Top = 14
|
---|
61 | Width = 495
|
---|
62 | Height = 65
|
---|
63 | Align = alClient
|
---|
64 | ItemHeight = 13
|
---|
65 | ParentShowHint = False
|
---|
66 | ShowHint = True
|
---|
67 | TabOrder = 0
|
---|
68 | OnClick = lstFlagsClick
|
---|
69 | ItemTipColor = clWindow
|
---|
70 | LongList = False
|
---|
71 | Pieces = '2'
|
---|
72 | OnChange = lstFlagsClick
|
---|
73 | end
|
---|
74 | end
|
---|
75 | object memFlags: TRichEdit
|
---|
76 | Left = 0
|
---|
77 | Top = 80
|
---|
78 | Width = 497
|
---|
79 | Height = 228
|
---|
80 | Align = alClient
|
---|
81 | Font.Charset = ANSI_CHARSET
|
---|
82 | Font.Color = clWindowText
|
---|
83 | Font.Height = -11
|
---|
84 | Font.Name = 'Courier New'
|
---|
85 | Font.Style = []
|
---|
86 | HideScrollBars = False
|
---|
87 | Lines.Strings = (
|
---|
88 | '')
|
---|
89 | ParentFont = False
|
---|
90 | ReadOnly = True
|
---|
91 | ScrollBars = ssBoth
|
---|
92 | TabOrder = 1
|
---|
93 | WantReturns = False
|
---|
94 | WordWrap = False
|
---|
95 | end
|
---|
96 | object pnlNotes: TPanel
|
---|
97 | Left = 0
|
---|
98 | Top = 312
|
---|
99 | Width = 497
|
---|
100 | Height = 152
|
---|
101 | Align = alBottom
|
---|
102 | TabOrder = 2
|
---|
103 | object lblNoteTitle: TLabel
|
---|
104 | Left = 1
|
---|
105 | Top = 1
|
---|
106 | Width = 495
|
---|
107 | Height = 13
|
---|
108 | Align = alTop
|
---|
109 | Caption = 'lblNoteTitle'
|
---|
110 | end
|
---|
111 | object lvPRF: TCaptionListView
|
---|
112 | Left = 1
|
---|
113 | Top = 14
|
---|
114 | Width = 495
|
---|
115 | Height = 106
|
---|
116 | Align = alClient
|
---|
117 | Columns = <
|
---|
118 | item
|
---|
119 | Caption = 'Used For Screen Readers'
|
---|
120 | Width = 1
|
---|
121 | end
|
---|
122 | item
|
---|
123 | AutoSize = True
|
---|
124 | Caption = 'Date'
|
---|
125 | end
|
---|
126 | item
|
---|
127 | AutoSize = True
|
---|
128 | Caption = 'Action'
|
---|
129 | end
|
---|
130 | item
|
---|
131 | AutoSize = True
|
---|
132 | Caption = 'Author'
|
---|
133 | end>
|
---|
134 | Constraints.MinHeight = 50
|
---|
135 | HideSelection = False
|
---|
136 | Items.Data = {
|
---|
137 | 6C0000000100000000000000FFFFFFFFFFFFFFFF03000000000000000857414E
|
---|
138 | 44455245521C4F63746F6265722032302C20323030334031303A31353A32333A
|
---|
139 | 3233115245414C4C59204C4F4E47205354554646115069636B6572696E672C20
|
---|
140 | 4D6F726F6E69FFFFFFFFFFFF}
|
---|
141 | ReadOnly = True
|
---|
142 | RowSelect = True
|
---|
143 | TabOrder = 0
|
---|
144 | ViewStyle = vsReport
|
---|
145 | OnClick = lvPRFClick
|
---|
146 | OnKeyDown = lvPRFKeyDown
|
---|
147 | end
|
---|
148 | object pnlBottom: TORAutoPanel
|
---|
149 | Left = 1
|
---|
150 | Top = 120
|
---|
151 | Width = 495
|
---|
152 | Height = 31
|
---|
153 | Align = alBottom
|
---|
154 | TabOrder = 1
|
---|
155 | DesignSize = (
|
---|
156 | 495
|
---|
157 | 31)
|
---|
158 | object btnClose: TButton
|
---|
159 | Left = 410
|
---|
160 | Top = 5
|
---|
161 | Width = 77
|
---|
162 | Height = 21
|
---|
163 | Anchors = [akRight, akBottom]
|
---|
164 | Cancel = True
|
---|
165 | Caption = 'Close'
|
---|
166 | ModalResult = 2
|
---|
167 | TabOrder = 0
|
---|
168 | end
|
---|
169 | end
|
---|
170 | end
|
---|
171 | object DKLanguageController1: TDKLanguageController
|
---|
172 | Left = 240
|
---|
173 | Top = 232
|
---|
174 | LangData = {
|
---|
175 | 080066726D466C616773010100000001000000070043617074696F6E010B0000
|
---|
176 | 00090053706C6974746572310000090053706C69747465723200000600706E6C
|
---|
177 | 546F70000008006C626C466C616773010100000002000000070043617074696F
|
---|
178 | 6E0008006C7374466C616773000008006D656D466C61677300000800706E6C4E
|
---|
179 | 6F74657300000C006C626C4E6F74655469746C65010100000003000000070043
|
---|
180 | 617074696F6E0005006C765052460104000000040000001200436F6C756D6E73
|
---|
181 | 5B305D2E43617074696F6E050000001200436F6C756D6E735B315D2E43617074
|
---|
182 | 696F6E060000001200436F6C756D6E735B325D2E43617074696F6E0700000012
|
---|
183 | 00436F6C756D6E735B335D2E43617074696F6E000900706E6C426F74746F6D00
|
---|
184 | 00080062746E436C6F7365010100000008000000070043617074696F6E00}
|
---|
185 | end
|
---|
186 | end
|
---|