| [460] | 1 | object frmGraphProfiles: TfrmGraphProfiles
|
|---|
| 2 | Left = 721
|
|---|
| 3 | Top = 528
|
|---|
| 4 | BorderIcons = [biSystemMenu, biHelp]
|
|---|
| 5 | BorderStyle = bsDialog
|
|---|
| 6 | Caption = 'Select Items and Define Views'
|
|---|
| 7 | ClientHeight = 379
|
|---|
| 8 | ClientWidth = 477
|
|---|
| 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 | OnShow = FormShow
|
|---|
| 20 | PixelsPerInch = 96
|
|---|
| 21 | TextHeight = 13
|
|---|
| 22 | object lblSource: TLabel
|
|---|
| 23 | Left = 8
|
|---|
| 24 | Top = 29
|
|---|
| 25 | Width = 37
|
|---|
| 26 | Height = 13
|
|---|
| 27 | Hint = 'These are the different types of data for graphing.'
|
|---|
| 28 | Caption = 'Source:'
|
|---|
| 29 | ParentShowHint = False
|
|---|
| 30 | ShowHint = False
|
|---|
| 31 | end
|
|---|
| 32 | object lblSelection: TLabel
|
|---|
| 33 | Left = 142
|
|---|
| 34 | Top = 29
|
|---|
| 35 | Width = 28
|
|---|
| 36 | Height = 13
|
|---|
| 37 | Hint = 'Make selections move them to the right.'
|
|---|
| 38 | Caption = 'Items:'
|
|---|
| 39 | ParentShowHint = False
|
|---|
| 40 | ShowHint = False
|
|---|
| 41 | end
|
|---|
| 42 | object lblDisplay: TLabel
|
|---|
| 43 | Left = 312
|
|---|
| 44 | Top = 29
|
|---|
| 45 | Width = 89
|
|---|
| 46 | Height = 13
|
|---|
| 47 | Hint =
|
|---|
| 48 | 'These items can be saved as a View and/or displayed on the graph' +
|
|---|
| 49 | '.'
|
|---|
| 50 | Caption = 'Items for Graphing:'
|
|---|
| 51 | ParentShowHint = False
|
|---|
| 52 | ShowHint = False
|
|---|
| 53 | end
|
|---|
| 54 | object bvlBase: TBevel
|
|---|
| 55 | Left = 8
|
|---|
| 56 | Top = 339
|
|---|
| 57 | Width = 457
|
|---|
| 58 | Height = 2
|
|---|
| 59 | end
|
|---|
| 60 | object lblEditInfo: TLabel
|
|---|
| 61 | Left = 132
|
|---|
| 62 | Top = 278
|
|---|
| 63 | Width = 202
|
|---|
| 64 | Height = 13
|
|---|
| 65 | Caption = 'Items for Graphing can be saved as Views.'
|
|---|
| 66 | end
|
|---|
| 67 | object lblSelectionInfo: TLabel
|
|---|
| 68 | Left = 42
|
|---|
| 69 | Top = 8
|
|---|
| 70 | Width = 89
|
|---|
| 71 | Height = 13
|
|---|
| 72 | Caption = 'Select Items using:'
|
|---|
| 73 | ParentShowHint = False
|
|---|
| 74 | ShowHint = False
|
|---|
| 75 | end
|
|---|
| 76 | object lblSelectandDefine: TLabel
|
|---|
| 77 | Left = 8
|
|---|
| 78 | Top = 350
|
|---|
| 79 | Width = 359
|
|---|
| 80 | Height = 13
|
|---|
| 81 | Caption =
|
|---|
| 82 | 'Use Select/Define button or Right-click on graphs to select item' +
|
|---|
| 83 | 's for display.'
|
|---|
| 84 | WordWrap = True
|
|---|
| 85 | end
|
|---|
| 86 | object lblEditInfo1: TLabel
|
|---|
| 87 | Left = 132
|
|---|
| 88 | Top = 294
|
|---|
| 89 | Width = 187
|
|---|
| 90 | Height = 13
|
|---|
| 91 | Caption = 'Edit Views by saving to the same name.'
|
|---|
| 92 | end
|
|---|
| 93 | object btnClear: TButton
|
|---|
| 94 | Left = 8
|
|---|
| 95 | Top = 312
|
|---|
| 96 | Width = 85
|
|---|
| 97 | Height = 21
|
|---|
| 98 | Caption = 'Clear Selections'
|
|---|
| 99 | Enabled = False
|
|---|
| 100 | ParentShowHint = False
|
|---|
| 101 | ShowHint = False
|
|---|
| 102 | TabOrder = 8
|
|---|
| 103 | OnClick = btnClearClick
|
|---|
| 104 | end
|
|---|
| 105 | object btnSave: TButton
|
|---|
| 106 | Left = 286
|
|---|
| 107 | Top = 312
|
|---|
| 108 | Width = 85
|
|---|
| 109 | Height = 21
|
|---|
| 110 | Caption = 'Save Personal...'
|
|---|
| 111 | Enabled = False
|
|---|
| 112 | ParentShowHint = False
|
|---|
| 113 | ShowHint = False
|
|---|
| 114 | TabOrder = 12
|
|---|
| 115 | OnClick = btnSaveClick
|
|---|
| 116 | end
|
|---|
| 117 | object btnDelete: TButton
|
|---|
| 118 | Left = 100
|
|---|
| 119 | Top = 312
|
|---|
| 120 | Width = 85
|
|---|
| 121 | Height = 21
|
|---|
| 122 | Caption = 'Delete...'
|
|---|
| 123 | Enabled = False
|
|---|
| 124 | ParentShowHint = False
|
|---|
| 125 | ShowHint = False
|
|---|
| 126 | TabOrder = 9
|
|---|
| 127 | OnClick = btnDeleteClick
|
|---|
| 128 | end
|
|---|
| 129 | object btnRemoveOne: TButton
|
|---|
| 130 | Left = 280
|
|---|
| 131 | Top = 173
|
|---|
| 132 | Width = 21
|
|---|
| 133 | Height = 21
|
|---|
| 134 | Caption = '<'
|
|---|
| 135 | Enabled = False
|
|---|
| 136 | ParentShowHint = False
|
|---|
| 137 | ShowHint = False
|
|---|
| 138 | TabOrder = 6
|
|---|
| 139 | OnClick = btnRemoveOneClick
|
|---|
| 140 | end
|
|---|
| 141 | object btnRemoveAll: TButton
|
|---|
| 142 | Left = 280
|
|---|
| 143 | Top = 205
|
|---|
| 144 | Width = 21
|
|---|
| 145 | Height = 21
|
|---|
| 146 | Caption = '<<'
|
|---|
| 147 | Enabled = False
|
|---|
| 148 | ParentShowHint = False
|
|---|
| 149 | ShowHint = False
|
|---|
| 150 | TabOrder = 7
|
|---|
| 151 | OnClick = btnRemoveAllClick
|
|---|
| 152 | end
|
|---|
| 153 | object lstSource: TORListBox
|
|---|
| 154 | Left = 8
|
|---|
| 155 | Top = 44
|
|---|
| 156 | Width = 120
|
|---|
| 157 | Height = 225
|
|---|
| 158 | ItemHeight = 13
|
|---|
| 159 | ParentShowHint = False
|
|---|
| 160 | ShowHint = False
|
|---|
| 161 | TabOrder = 0
|
|---|
| 162 | OnDblClick = lstSourceDblClick
|
|---|
| 163 | ItemTipColor = clWindow
|
|---|
| 164 | LongList = False
|
|---|
| 165 | Pieces = '2'
|
|---|
| 166 | OnChange = lstSourceChange
|
|---|
| 167 | end
|
|---|
| 168 | object lstItemsDisplayed: TORListBox
|
|---|
| 169 | Left = 312
|
|---|
| 170 | Top = 44
|
|---|
| 171 | Width = 150
|
|---|
| 172 | Height = 225
|
|---|
| 173 | ItemHeight = 13
|
|---|
| 174 | ParentShowHint = False
|
|---|
| 175 | ShowHint = False
|
|---|
| 176 | Sorted = True
|
|---|
| 177 | TabOrder = 3
|
|---|
| 178 | OnDblClick = lstItemsDisplayedDblClick
|
|---|
| 179 | ItemTipColor = clWindow
|
|---|
| 180 | LongList = False
|
|---|
| 181 | Pieces = '3'
|
|---|
| 182 | OnChange = lstItemsDisplayedChange
|
|---|
| 183 | end
|
|---|
| 184 | object pnlSource: TPanel
|
|---|
| 185 | Left = 147
|
|---|
| 186 | Top = 1
|
|---|
| 187 | Width = 190
|
|---|
| 188 | Height = 25
|
|---|
| 189 | BevelOuter = bvNone
|
|---|
| 190 | TabOrder = 11
|
|---|
| 191 | object radSourcePat: TRadioButton
|
|---|
| 192 | Left = 87
|
|---|
| 193 | Top = 6
|
|---|
| 194 | Width = 82
|
|---|
| 195 | Height = 17
|
|---|
| 196 | Hint =
|
|---|
| 197 | 'Use this for selecting patient items. Note: this form is used pr' +
|
|---|
| 198 | 'imarily for defining views, #13 not selecting data.'
|
|---|
| 199 | Caption = 'Patient Items'
|
|---|
| 200 | TabOrder = 1
|
|---|
| 201 | OnClick = radSourceAllClick
|
|---|
| 202 | end
|
|---|
| 203 | object radSourceAll: TRadioButton
|
|---|
| 204 | Left = 0
|
|---|
| 205 | Top = 6
|
|---|
| 206 | Width = 60
|
|---|
| 207 | Height = 17
|
|---|
| 208 | Hint = 'Use this for defining views. It shows every possible item.'
|
|---|
| 209 | Caption = 'All Items'
|
|---|
| 210 | Checked = True
|
|---|
| 211 | TabOrder = 0
|
|---|
| 212 | TabStop = True
|
|---|
| 213 | OnClick = radSourceAllClick
|
|---|
| 214 | end
|
|---|
| 215 | end
|
|---|
| 216 | object lstItemsTopSelection: TORListBox
|
|---|
| 217 | Left = 142
|
|---|
| 218 | Top = 44
|
|---|
| 219 | Width = 120
|
|---|
| 220 | Height = 225
|
|---|
| 221 | ItemHeight = 13
|
|---|
| 222 | ParentShowHint = False
|
|---|
| 223 | ShowHint = False
|
|---|
| 224 | Sorted = True
|
|---|
| 225 | TabOrder = 2
|
|---|
| 226 | Visible = False
|
|---|
| 227 | OnDblClick = cboAllItemsClick
|
|---|
| 228 | ItemTipColor = clWindow
|
|---|
| 229 | LongList = False
|
|---|
| 230 | Pieces = '3'
|
|---|
| 231 | OnChange = cboAllItemsChange
|
|---|
| 232 | end
|
|---|
| 233 | object pnlTempData: TPanel
|
|---|
| 234 | Left = 16
|
|---|
| 235 | Top = 230
|
|---|
| 236 | Width = 425
|
|---|
| 237 | Height = 49
|
|---|
| 238 | TabOrder = 14
|
|---|
| 239 | Visible = False
|
|---|
| 240 | object lblSave: TLabel
|
|---|
| 241 | Left = 184
|
|---|
| 242 | Top = 16
|
|---|
| 243 | Width = 3
|
|---|
| 244 | Height = 13
|
|---|
| 245 | Visible = False
|
|---|
| 246 | end
|
|---|
| 247 | object lblClose: TLabel
|
|---|
| 248 | Left = 192
|
|---|
| 249 | Top = 0
|
|---|
| 250 | Width = 3
|
|---|
| 251 | Height = 13
|
|---|
| 252 | Visible = False
|
|---|
| 253 | end
|
|---|
| 254 | object lstActualItems: TORListBox
|
|---|
| 255 | Left = 8
|
|---|
| 256 | Top = 5
|
|---|
| 257 | Width = 97
|
|---|
| 258 | Height = 41
|
|---|
| 259 | ItemHeight = 13
|
|---|
| 260 | ParentShowHint = False
|
|---|
| 261 | ShowHint = True
|
|---|
| 262 | TabOrder = 0
|
|---|
| 263 | ItemTipColor = clWindow
|
|---|
| 264 | LongList = False
|
|---|
| 265 | end
|
|---|
| 266 | object lstDrugClass: TListBox
|
|---|
| 267 | Left = 112
|
|---|
| 268 | Top = 5
|
|---|
| 269 | Width = 97
|
|---|
| 270 | Height = 41
|
|---|
| 271 | ItemHeight = 13
|
|---|
| 272 | TabOrder = 1
|
|---|
| 273 | end
|
|---|
| 274 | object lstScratch: TListBox
|
|---|
| 275 | Left = 216
|
|---|
| 276 | Top = 5
|
|---|
| 277 | Width = 97
|
|---|
| 278 | Height = 41
|
|---|
| 279 | ItemHeight = 13
|
|---|
| 280 | TabOrder = 2
|
|---|
| 281 | end
|
|---|
| 282 | object lstTests: TListBox
|
|---|
| 283 | Left = 320
|
|---|
| 284 | Top = 5
|
|---|
| 285 | Width = 97
|
|---|
| 286 | Height = 41
|
|---|
| 287 | ItemHeight = 13
|
|---|
| 288 | TabOrder = 3
|
|---|
| 289 | end
|
|---|
| 290 | end
|
|---|
| 291 | object pnlApply: TPanel
|
|---|
| 292 | Left = 0
|
|---|
| 293 | Top = 344
|
|---|
| 294 | Width = 377
|
|---|
| 295 | Height = 36
|
|---|
| 296 | BevelOuter = bvNone
|
|---|
| 297 | ParentShowHint = False
|
|---|
| 298 | ShowHint = False
|
|---|
| 299 | TabOrder = 15
|
|---|
| 300 | object lblApply: TLabel
|
|---|
| 301 | Left = 8
|
|---|
| 302 | Top = 2
|
|---|
| 303 | Width = 138
|
|---|
| 304 | Height = 13
|
|---|
| 305 | Caption = 'Display Items for Graphing to:'
|
|---|
| 306 | end
|
|---|
| 307 | object radTop: TRadioButton
|
|---|
| 308 | Left = 8
|
|---|
| 309 | Top = 17
|
|---|
| 310 | Width = 57
|
|---|
| 311 | Height = 17
|
|---|
| 312 | Caption = 'Top'
|
|---|
| 313 | Checked = True
|
|---|
| 314 | TabOrder = 0
|
|---|
| 315 | TabStop = True
|
|---|
| 316 | end
|
|---|
| 317 | object radBottom: TRadioButton
|
|---|
| 318 | Left = 74
|
|---|
| 319 | Top = 17
|
|---|
| 320 | Width = 57
|
|---|
| 321 | Height = 17
|
|---|
| 322 | Caption = 'Bottom'
|
|---|
| 323 | TabOrder = 1
|
|---|
| 324 | end
|
|---|
| 325 | object radBoth: TRadioButton
|
|---|
| 326 | Left = 141
|
|---|
| 327 | Top = 17
|
|---|
| 328 | Width = 57
|
|---|
| 329 | Height = 17
|
|---|
| 330 | Caption = 'Both'
|
|---|
| 331 | TabOrder = 2
|
|---|
| 332 | end
|
|---|
| 333 | object radNeither: TRadioButton
|
|---|
| 334 | Left = 208
|
|---|
| 335 | Top = 17
|
|---|
| 336 | Width = 81
|
|---|
| 337 | Height = 17
|
|---|
| 338 | Caption = 'No Change'
|
|---|
| 339 | TabOrder = 3
|
|---|
| 340 | end
|
|---|
| 341 | end
|
|---|
| 342 | object btnAdd: TButton
|
|---|
| 343 | Left = 280
|
|---|
| 344 | Top = 125
|
|---|
| 345 | Width = 21
|
|---|
| 346 | Height = 21
|
|---|
| 347 | Caption = '>'
|
|---|
| 348 | Enabled = False
|
|---|
| 349 | ParentShowHint = False
|
|---|
| 350 | ShowHint = False
|
|---|
| 351 | TabOrder = 5
|
|---|
| 352 | OnClick = cboAllItemsClick
|
|---|
| 353 | end
|
|---|
| 354 | object btnAddAll: TButton
|
|---|
| 355 | Left = 280
|
|---|
| 356 | Top = 93
|
|---|
| 357 | Width = 21
|
|---|
| 358 | Height = 21
|
|---|
| 359 | Caption = '>>'
|
|---|
| 360 | Enabled = False
|
|---|
| 361 | ParentShowHint = False
|
|---|
| 362 | ShowHint = False
|
|---|
| 363 | TabOrder = 4
|
|---|
| 364 | OnClick = cboAllItemsClick
|
|---|
| 365 | end
|
|---|
| 366 | object btnRename: TButton
|
|---|
| 367 | Left = 193
|
|---|
| 368 | Top = 312
|
|---|
| 369 | Width = 85
|
|---|
| 370 | Height = 21
|
|---|
| 371 | Caption = 'Rename...'
|
|---|
| 372 | Enabled = False
|
|---|
| 373 | ParentShowHint = False
|
|---|
| 374 | ShowHint = False
|
|---|
| 375 | TabOrder = 10
|
|---|
| 376 | OnClick = btnRenameClick
|
|---|
| 377 | end
|
|---|
| 378 | object btnSavePublic: TButton
|
|---|
| 379 | Left = 379
|
|---|
| 380 | Top = 312
|
|---|
| 381 | Width = 85
|
|---|
| 382 | Height = 21
|
|---|
| 383 | Caption = 'Save Public...'
|
|---|
| 384 | Enabled = False
|
|---|
| 385 | ParentShowHint = False
|
|---|
| 386 | ShowHint = False
|
|---|
| 387 | TabOrder = 13
|
|---|
| 388 | OnClick = btnSaveClick
|
|---|
| 389 | end
|
|---|
| 390 | object cboAllItems: TORComboBox
|
|---|
| 391 | Left = 142
|
|---|
| 392 | Top = 44
|
|---|
| 393 | Width = 123
|
|---|
| 394 | Height = 225
|
|---|
| 395 | Style = orcsSimple
|
|---|
| 396 | AutoSelect = True
|
|---|
| 397 | Color = clWindow
|
|---|
| 398 | DropDownCount = 8
|
|---|
| 399 | ItemHeight = 13
|
|---|
| 400 | ItemTipColor = clWindow
|
|---|
| 401 | ItemTipEnable = True
|
|---|
| 402 | ListItemsOnly = True
|
|---|
| 403 | LongList = True
|
|---|
| 404 | LookupPiece = 0
|
|---|
| 405 | MaxLength = 0
|
|---|
| 406 | ParentShowHint = False
|
|---|
| 407 | Pieces = '3'
|
|---|
| 408 | ShowHint = False
|
|---|
| 409 | Sorted = False
|
|---|
| 410 | SynonymChars = '<>'
|
|---|
| 411 | TabOrder = 1
|
|---|
| 412 | OnChange = cboAllItemsChange
|
|---|
| 413 | OnDblClick = cboAllItemsClick
|
|---|
| 414 | OnNeedData = cboAllItemsNeedData
|
|---|
| 415 | CharsNeedMatch = 1
|
|---|
| 416 | end
|
|---|
| 417 | object btnClose: TButton
|
|---|
| 418 | Left = 371
|
|---|
| 419 | Top = 353
|
|---|
| 420 | Width = 97
|
|---|
| 421 | Height = 21
|
|---|
| 422 | Cancel = True
|
|---|
| 423 | Caption = 'Close'
|
|---|
| 424 | ParentShowHint = False
|
|---|
| 425 | ShowHint = False
|
|---|
| 426 | TabOrder = 16
|
|---|
| 427 | OnClick = btnCloseClick
|
|---|
| 428 | end
|
|---|
| 429 | end
|
|---|
