| Rev | Line | |
|---|
| [456] | 1 | inherited frmPCELex: TfrmPCELex
|
|---|
| 2 | Left = 639
|
|---|
| 3 | Top = 480
|
|---|
| 4 | BorderIcons = []
|
|---|
| 5 | BorderStyle = bsDialog
|
|---|
| 6 | Caption = 'Lookup Other Diagnosis'
|
|---|
| [829] | 7 | ClientHeight = 275
|
|---|
| 8 | ClientWidth = 429
|
|---|
| [456] | 9 | Position = poScreenCenter
|
|---|
| 10 | OnCreate = FormCreate
|
|---|
| [829] | 11 | ExplicitWidth = 320
|
|---|
| 12 | ExplicitHeight = 240
|
|---|
| [456] | 13 | PixelsPerInch = 96
|
|---|
| 14 | TextHeight = 13
|
|---|
| [829] | 15 | object lblSearch: TLabel [0]
|
|---|
| [456] | 16 | Left = 6
|
|---|
| 17 | Top = 16
|
|---|
| 18 | Width = 98
|
|---|
| 19 | Height = 13
|
|---|
| 20 | Caption = 'Search for Diagnosis'
|
|---|
| 21 | end
|
|---|
| [829] | 22 | object lblSelect: TLabel [1]
|
|---|
| [456] | 23 | Left = 6
|
|---|
| 24 | Top = 67
|
|---|
| 25 | Width = 175
|
|---|
| 26 | Height = 13
|
|---|
| 27 | Caption = 'Select from one of the following items'
|
|---|
| 28 | Visible = False
|
|---|
| 29 | end
|
|---|
| [829] | 30 | object txtSearch: TCaptionEdit [2]
|
|---|
| [456] | 31 | Left = 6
|
|---|
| 32 | Top = 30
|
|---|
| 33 | Width = 331
|
|---|
| 34 | Height = 21
|
|---|
| 35 | TabOrder = 0
|
|---|
| 36 | OnChange = txtSearchChange
|
|---|
| 37 | Caption = 'Search for Diagnosis'
|
|---|
| 38 | end
|
|---|
| [829] | 39 | object cmdSearch: TButton [3]
|
|---|
| [456] | 40 | Left = 346
|
|---|
| 41 | Top = 30
|
|---|
| 42 | Width = 75
|
|---|
| 43 | Height = 21
|
|---|
| 44 | Caption = 'Search'
|
|---|
| 45 | Default = True
|
|---|
| 46 | TabOrder = 1
|
|---|
| 47 | OnClick = cmdSearchClick
|
|---|
| 48 | end
|
|---|
| [829] | 49 | object cmdOK: TButton [4]
|
|---|
| [456] | 50 | Left = 263
|
|---|
| 51 | Top = 245
|
|---|
| 52 | Width = 75
|
|---|
| 53 | Height = 22
|
|---|
| 54 | Caption = 'OK'
|
|---|
| 55 | TabOrder = 3
|
|---|
| 56 | OnClick = cmdOKClick
|
|---|
| 57 | end
|
|---|
| [829] | 58 | object cmdCancel: TButton [5]
|
|---|
| [456] | 59 | Left = 346
|
|---|
| 60 | Top = 245
|
|---|
| 61 | Width = 75
|
|---|
| 62 | Height = 22
|
|---|
| 63 | Cancel = True
|
|---|
| 64 | Caption = 'Cancel'
|
|---|
| 65 | TabOrder = 4
|
|---|
| 66 | OnClick = cmdCancelClick
|
|---|
| 67 | end
|
|---|
| [829] | 68 | object lstSelect: TORListBox [6]
|
|---|
| [456] | 69 | Left = 6
|
|---|
| 70 | Top = 81
|
|---|
| 71 | Width = 415
|
|---|
| 72 | Height = 156
|
|---|
| 73 | ItemHeight = 13
|
|---|
| 74 | ParentShowHint = False
|
|---|
| 75 | ShowHint = True
|
|---|
| 76 | TabOrder = 2
|
|---|
| 77 | OnClick = lstSelectClick
|
|---|
| 78 | OnDblClick = lstSelectDblClick
|
|---|
| 79 | Caption = 'Select from one of the following items'
|
|---|
| 80 | ItemTipColor = clWindow
|
|---|
| 81 | LongList = False
|
|---|
| 82 | Pieces = '2'
|
|---|
| 83 | end
|
|---|
| [829] | 84 | inherited amgrMain: TVA508AccessibilityManager
|
|---|
| 85 | Data = (
|
|---|
| 86 | (
|
|---|
| 87 | 'Component = txtSearch'
|
|---|
| 88 | 'Status = stsDefault')
|
|---|
| 89 | (
|
|---|
| 90 | 'Component = cmdSearch'
|
|---|
| 91 | 'Status = stsDefault')
|
|---|
| 92 | (
|
|---|
| 93 | 'Component = cmdOK'
|
|---|
| 94 | 'Status = stsDefault')
|
|---|
| 95 | (
|
|---|
| 96 | 'Component = cmdCancel'
|
|---|
| 97 | 'Status = stsDefault')
|
|---|
| 98 | (
|
|---|
| 99 | 'Component = lstSelect'
|
|---|
| 100 | 'Status = stsDefault')
|
|---|
| 101 | (
|
|---|
| 102 | 'Component = frmPCELex'
|
|---|
| 103 | 'Status = stsDefault'))
|
|---|
| 104 | end
|
|---|
| [456] | 105 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
