| 1 | inherited frmConsultsView: TfrmConsultsView
|
|---|
| 2 | Left = 320
|
|---|
| 3 | Top = 172
|
|---|
| 4 | BorderIcons = []
|
|---|
| 5 | Caption = 'List Selected Consults'
|
|---|
| 6 | ClientHeight = 373
|
|---|
| 7 | ClientWidth = 406
|
|---|
| 8 | OldCreateOrder = True
|
|---|
| 9 | Position = poScreenCenter
|
|---|
| 10 | PixelsPerInch = 96
|
|---|
| 11 | TextHeight = 13
|
|---|
| 12 | object pnlBase: TORAutoPanel [0]
|
|---|
| 13 | Left = 0
|
|---|
| 14 | Top = 0
|
|---|
| 15 | Width = 406
|
|---|
| 16 | Height = 373
|
|---|
| 17 | Align = alClient
|
|---|
| 18 | BevelOuter = bvNone
|
|---|
| 19 | TabOrder = 0
|
|---|
| 20 | object lblBeginDate: TLabel
|
|---|
| 21 | Left = 239
|
|---|
| 22 | Top = 128
|
|---|
| 23 | Width = 73
|
|---|
| 24 | Height = 13
|
|---|
| 25 | Caption = 'Beginning Date'
|
|---|
| 26 | end
|
|---|
| 27 | object lblEndDate: TLabel
|
|---|
| 28 | Left = 239
|
|---|
| 29 | Top = 173
|
|---|
| 30 | Width = 59
|
|---|
| 31 | Height = 13
|
|---|
| 32 | Caption = 'Ending Date'
|
|---|
| 33 | end
|
|---|
| 34 | object lblService: TLabel
|
|---|
| 35 | Left = 8
|
|---|
| 36 | Top = 9
|
|---|
| 37 | Width = 36
|
|---|
| 38 | Height = 13
|
|---|
| 39 | Caption = 'Service'
|
|---|
| 40 | end
|
|---|
| 41 | object lblStatus: TLabel
|
|---|
| 42 | Left = 239
|
|---|
| 43 | Top = 10
|
|---|
| 44 | Width = 30
|
|---|
| 45 | Height = 13
|
|---|
| 46 | Caption = 'Status'
|
|---|
| 47 | end
|
|---|
| 48 | object Label1: TLabel
|
|---|
| 49 | Left = 239
|
|---|
| 50 | Top = 217
|
|---|
| 51 | Width = 44
|
|---|
| 52 | Height = 13
|
|---|
| 53 | Caption = 'Group By'
|
|---|
| 54 | end
|
|---|
| 55 | object calBeginDate: TORDateBox
|
|---|
| 56 | Left = 239
|
|---|
| 57 | Top = 142
|
|---|
| 58 | Width = 155
|
|---|
| 59 | Height = 21
|
|---|
| 60 | TabOrder = 3
|
|---|
| 61 | DateOnly = False
|
|---|
| 62 | RequireTime = False
|
|---|
| 63 | Caption = 'Beginning Date'
|
|---|
| 64 | end
|
|---|
| 65 | object calEndDate: TORDateBox
|
|---|
| 66 | Left = 239
|
|---|
| 67 | Top = 187
|
|---|
| 68 | Width = 155
|
|---|
| 69 | Height = 21
|
|---|
| 70 | TabOrder = 4
|
|---|
| 71 | DateOnly = False
|
|---|
| 72 | RequireTime = False
|
|---|
| 73 | Caption = 'Ending Date'
|
|---|
| 74 | end
|
|---|
| 75 | object lstStatus: TORListBox
|
|---|
| 76 | Left = 239
|
|---|
| 77 | Top = 24
|
|---|
| 78 | Width = 156
|
|---|
| 79 | Height = 96
|
|---|
| 80 | ItemHeight = 13
|
|---|
| 81 | MultiSelect = True
|
|---|
| 82 | ParentShowHint = False
|
|---|
| 83 | PopupMenu = popStatus
|
|---|
| 84 | ShowHint = True
|
|---|
| 85 | TabOrder = 2
|
|---|
| 86 | Caption = 'Status'
|
|---|
| 87 | ItemTipColor = clWindow
|
|---|
| 88 | LongList = False
|
|---|
| 89 | Pieces = '2'
|
|---|
| 90 | end
|
|---|
| 91 | object radSort: TRadioGroup
|
|---|
| 92 | Left = 239
|
|---|
| 93 | Top = 266
|
|---|
| 94 | Width = 155
|
|---|
| 95 | Height = 64
|
|---|
| 96 | Caption = 'Sort Order'
|
|---|
| 97 | Items.Strings = (
|
|---|
| 98 | '&Ascending (oldest first)'
|
|---|
| 99 | '&Descending (newest first)')
|
|---|
| 100 | TabOrder = 6
|
|---|
| 101 | end
|
|---|
| 102 | object cmdOK: TButton
|
|---|
| 103 | Left = 239
|
|---|
| 104 | Top = 340
|
|---|
| 105 | Width = 72
|
|---|
| 106 | Height = 21
|
|---|
| 107 | Caption = 'OK'
|
|---|
| 108 | Default = True
|
|---|
| 109 | TabOrder = 7
|
|---|
| 110 | OnClick = cmdOKClick
|
|---|
| 111 | end
|
|---|
| 112 | object cmdCancel: TButton
|
|---|
| 113 | Left = 324
|
|---|
| 114 | Top = 340
|
|---|
| 115 | Width = 72
|
|---|
| 116 | Height = 21
|
|---|
| 117 | Cancel = True
|
|---|
| 118 | Caption = 'Cancel'
|
|---|
| 119 | TabOrder = 8
|
|---|
| 120 | OnClick = cmdCancelClick
|
|---|
| 121 | end
|
|---|
| 122 | object treService: TORTreeView
|
|---|
| 123 | Left = 8
|
|---|
| 124 | Top = 57
|
|---|
| 125 | Width = 214
|
|---|
| 126 | Height = 304
|
|---|
| 127 | HideSelection = False
|
|---|
| 128 | Indent = 19
|
|---|
| 129 | ReadOnly = True
|
|---|
| 130 | TabOrder = 1
|
|---|
| 131 | OnChange = treServiceChange
|
|---|
| 132 | Caption = 'Service'
|
|---|
| 133 | NodePiece = 0
|
|---|
| 134 | end
|
|---|
| 135 | object cboService: TORComboBox
|
|---|
| 136 | Left = 8
|
|---|
| 137 | Top = 27
|
|---|
| 138 | Width = 214
|
|---|
| 139 | Height = 21
|
|---|
| 140 | Style = orcsDropDown
|
|---|
| 141 | AutoSelect = True
|
|---|
| 142 | Caption = 'Service'
|
|---|
| 143 | Color = clWindow
|
|---|
| 144 | DropDownCount = 8
|
|---|
| 145 | ItemHeight = 13
|
|---|
| 146 | ItemTipColor = clWindow
|
|---|
| 147 | ItemTipEnable = True
|
|---|
| 148 | ListItemsOnly = True
|
|---|
| 149 | LongList = False
|
|---|
| 150 | LookupPiece = 0
|
|---|
| 151 | MaxLength = 0
|
|---|
| 152 | Pieces = '2'
|
|---|
| 153 | Sorted = True
|
|---|
| 154 | SynonymChars = '<>'
|
|---|
| 155 | TabOrder = 0
|
|---|
| 156 | OnKeyPause = cboServiceSelect
|
|---|
| 157 | OnMouseClick = cboServiceSelect
|
|---|
| 158 | CharsNeedMatch = 1
|
|---|
| 159 | end
|
|---|
| 160 | object cboGroupBy: TORComboBox
|
|---|
| 161 | Left = 239
|
|---|
| 162 | Top = 230
|
|---|
| 163 | Width = 155
|
|---|
| 164 | Height = 21
|
|---|
| 165 | Style = orcsDropDown
|
|---|
| 166 | AutoSelect = True
|
|---|
| 167 | Caption = 'Group By'
|
|---|
| 168 | Color = clWindow
|
|---|
| 169 | DropDownCount = 8
|
|---|
| 170 | Items.Strings = (
|
|---|
| 171 | '^(none)'
|
|---|
| 172 | 'T^Consults/Procedures'
|
|---|
| 173 | 'V^Service'
|
|---|
| 174 | 'S^Status')
|
|---|
| 175 | ItemHeight = 13
|
|---|
| 176 | ItemTipColor = clWindow
|
|---|
| 177 | ItemTipEnable = True
|
|---|
| 178 | ListItemsOnly = False
|
|---|
| 179 | LongList = False
|
|---|
| 180 | LookupPiece = 0
|
|---|
| 181 | MaxLength = 0
|
|---|
| 182 | Pieces = '2'
|
|---|
| 183 | Sorted = False
|
|---|
| 184 | SynonymChars = '<>'
|
|---|
| 185 | TabOrder = 5
|
|---|
| 186 | CharsNeedMatch = 1
|
|---|
| 187 | end
|
|---|
| 188 | end
|
|---|
| 189 | inherited amgrMain: TVA508AccessibilityManager
|
|---|
| 190 | Data = (
|
|---|
| 191 | (
|
|---|
| 192 | 'Component = pnlBase'
|
|---|
| 193 | 'Status = stsDefault')
|
|---|
| 194 | (
|
|---|
| 195 | 'Component = calBeginDate'
|
|---|
| 196 | 'Status = stsDefault')
|
|---|
| 197 | (
|
|---|
| 198 | 'Component = calEndDate'
|
|---|
| 199 | 'Status = stsDefault')
|
|---|
| 200 | (
|
|---|
| 201 | 'Component = lstStatus'
|
|---|
| 202 | 'Status = stsDefault')
|
|---|
| 203 | (
|
|---|
| 204 | 'Component = radSort'
|
|---|
| 205 | 'Status = stsDefault')
|
|---|
| 206 | (
|
|---|
| 207 | 'Component = cmdOK'
|
|---|
| 208 | 'Status = stsDefault')
|
|---|
| 209 | (
|
|---|
| 210 | 'Component = cmdCancel'
|
|---|
| 211 | 'Status = stsDefault')
|
|---|
| 212 | (
|
|---|
| 213 | 'Component = treService'
|
|---|
| 214 | 'Status = stsDefault')
|
|---|
| 215 | (
|
|---|
| 216 | 'Component = cboService'
|
|---|
| 217 | 'Status = stsDefault')
|
|---|
| 218 | (
|
|---|
| 219 | 'Component = cboGroupBy'
|
|---|
| 220 | 'Status = stsDefault')
|
|---|
| 221 | (
|
|---|
| 222 | 'Component = frmConsultsView'
|
|---|
| 223 | 'Status = stsDefault'))
|
|---|
| 224 | end
|
|---|
| 225 | object popStatus: TPopupMenu
|
|---|
| 226 | Left = 284
|
|---|
| 227 | Top = 51
|
|---|
| 228 | object popStatusSelectNone: TMenuItem
|
|---|
| 229 | Caption = 'Select None'
|
|---|
| 230 | OnClick = popStatusSelectNoneClick
|
|---|
| 231 | end
|
|---|
| 232 | end
|
|---|
| 233 | end
|
|---|
