source: cprs/trunk/CPRS-Chart/Options/fOptionsCombinations.dfm@ 1008

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

Upgrade to version 27

File size: 5.1 KB
Line 
1inherited frmOptionsCombinations: TfrmOptionsCombinations
2 Left = 366
3 Top = 189
4 HelpContext = 9120
5 BorderIcons = [biSystemMenu, biHelp]
6 BorderStyle = bsSingle
7 Caption = 'Source Combinations'
8 ClientHeight = 306
9 ClientWidth = 407
10 HelpFile = 'CPRSWT.HLP'
11 Position = poScreenCenter
12 OnCreate = FormCreate
13 OnShow = FormShow
14 PixelsPerInch = 96
15 TextHeight = 13
16 object lblAddby: TLabel [0]
17 Left = 7
18 Top = 97
19 Width = 29
20 Height = 13
21 Caption = 'Ward:'
22 end
23 object lblCombinations: TLabel [1]
24 Left = 224
25 Top = 97
26 Width = 66
27 Height = 13
28 Caption = 'Combinations:'
29 end
30 object lblInfo: TMemo [2]
31 Left = 183
32 Top = 16
33 Width = 218
34 Height = 81
35 TabStop = False
36 BorderStyle = bsNone
37 Color = clBtnFace
38 Lines.Strings = (
39 'You can change your combinations by adding '
40 'or removing specific wards, clinics, providers, '
41 'specialties, or lists. Patients meeting this '
42 'criteria can be used for patient selection.')
43 ReadOnly = True
44 TabOrder = 6
45 end
46 object radAddByType: TRadioGroup [3]
47 Left = 7
48 Top = 8
49 Width = 153
50 Height = 86
51 HelpContext = 9121
52 Caption = 'Select source by '
53 Columns = 2
54 ItemIndex = 0
55 Items.Strings = (
56 '&Ward'
57 '&Clinic'
58 '&Provider'
59 '&Specialty'
60 '&List')
61 TabOrder = 0
62 OnClick = radAddByTypeClick
63 end
64 object lstAddBy: TORComboBox [4]
65 Left = 7
66 Top = 112
67 Width = 153
68 Height = 153
69 HelpContext = 9122
70 Style = orcsSimple
71 AutoSelect = True
72 Caption = 'Ward'
73 Color = clWindow
74 DropDownCount = 8
75 ItemHeight = 13
76 ItemTipColor = clWindow
77 ItemTipEnable = True
78 ListItemsOnly = False
79 LongList = False
80 LookupPiece = 0
81 MaxLength = 0
82 Pieces = '2'
83 Sorted = True
84 SynonymChars = '<>'
85 TabOrder = 1
86 OnChange = lstAddByChange
87 OnDblClick = btnAddClick
88 OnEnter = lstAddByEnter
89 OnExit = lstAddByExit
90 OnKeyUp = lstAddByKeyUp
91 OnNeedData = lstAddByNeedData
92 CharsNeedMatch = 1
93 end
94 object btnAdd: TButton [5]
95 Left = 166
96 Top = 145
97 Width = 50
98 Height = 22
99 HelpContext = 9124
100 Caption = 'Add'
101 Enabled = False
102 Font.Charset = DEFAULT_CHARSET
103 Font.Color = clWindowText
104 Font.Height = -11
105 Font.Name = 'MS Sans Serif'
106 Font.Style = []
107 ParentFont = False
108 TabOrder = 2
109 OnClick = btnAddClick
110 end
111 object btnRemove: TButton [6]
112 Left = 165
113 Top = 218
114 Width = 50
115 Height = 22
116 HelpContext = 9125
117 Caption = 'Remove'
118 Enabled = False
119 Font.Charset = DEFAULT_CHARSET
120 Font.Color = clWindowText
121 Font.Height = -11
122 Font.Name = 'MS Sans Serif'
123 Font.Style = []
124 ParentFont = False
125 TabOrder = 3
126 OnClick = btnRemoveClick
127 end
128 object pnlBottom: TPanel [7]
129 Left = 0
130 Top = 273
131 Width = 407
132 Height = 33
133 HelpContext = 9120
134 Align = alBottom
135 BevelOuter = bvNone
136 ParentColor = True
137 TabOrder = 5
138 object bvlBottom: TBevel
139 Left = 0
140 Top = 0
141 Width = 407
142 Height = 2
143 Align = alTop
144 end
145 object btnOK: TButton
146 Left = 245
147 Top = 8
148 Width = 75
149 Height = 22
150 HelpContext = 9996
151 Caption = 'OK'
152 Default = True
153 ModalResult = 1
154 TabOrder = 0
155 OnClick = btnOKClick
156 end
157 object btnCancel: TButton
158 Left = 325
159 Top = 8
160 Width = 75
161 Height = 22
162 HelpContext = 9997
163 Cancel = True
164 Caption = 'Cancel'
165 ModalResult = 2
166 TabOrder = 1
167 end
168 end
169 object lvwCombinations: TCaptionListView [8]
170 Left = 224
171 Top = 112
172 Width = 177
173 Height = 150
174 HelpContext = 9123
175 Columns = <
176 item
177 Caption = 'Entry'
178 Width = 100
179 end
180 item
181 Caption = 'Source'
182 Width = 72
183 end>
184 MultiSelect = True
185 ReadOnly = True
186 RowSelect = True
187 SortType = stBoth
188 TabOrder = 4
189 ViewStyle = vsReport
190 OnChange = lvwCombinationsChange
191 OnColumnClick = lvwCombinationsColumnClick
192 OnCompare = lvwCombinationsCompare
193 OnDblClick = btnRemoveClick
194 Caption = 'Combinations'
195 end
196 inherited amgrMain: TVA508AccessibilityManager
197 Data = (
198 (
199 'Component = lblInfo'
200 'Status = stsDefault')
201 (
202 'Component = radAddByType'
203 'Status = stsDefault')
204 (
205 'Component = lstAddBy'
206 'Status = stsDefault')
207 (
208 'Component = btnAdd'
209 'Status = stsDefault')
210 (
211 'Component = btnRemove'
212 'Status = stsDefault')
213 (
214 'Component = pnlBottom'
215 'Status = stsDefault')
216 (
217 'Component = btnOK'
218 'Status = stsDefault')
219 (
220 'Component = btnCancel'
221 'Status = stsDefault')
222 (
223 'Component = lvwCombinations'
224 'Status = stsDefault')
225 (
226 'Component = frmOptionsCombinations'
227 'Status = stsDefault'))
228 end
229end
Note: See TracBrowser for help on using the repository browser.