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