[456] | 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
|
---|