| Last change
 on this file since 592 was             460, checked in by Kevin Toppenberg, 17 years ago | 
        
          | 
Uploading from OR_30_258
 | 
        
          | File size:
            1.6 KB | 
      
      
| Rev | Line |  | 
|---|
| [459] | 1 | inherited frmPCELex: TfrmPCELex | 
|---|
| [460] | 2 | Left = 639 | 
|---|
|  | 3 | Top = 480 | 
|---|
| [459] | 4 | BorderIcons = [] | 
|---|
|  | 5 | BorderStyle = bsDialog | 
|---|
|  | 6 | Caption = 'Lookup Other Diagnosis' | 
|---|
|  | 7 | Position = poScreenCenter | 
|---|
|  | 8 | OnCreate = FormCreate | 
|---|
|  | 9 | PixelsPerInch = 96 | 
|---|
|  | 10 | TextHeight = 13 | 
|---|
|  | 11 | object lblSearch: TLabel | 
|---|
|  | 12 | Left = 6 | 
|---|
|  | 13 | Top = 16 | 
|---|
|  | 14 | Width = 98 | 
|---|
|  | 15 | Height = 13 | 
|---|
|  | 16 | Caption = 'Search for Diagnosis' | 
|---|
|  | 17 | end | 
|---|
|  | 18 | object lblSelect: TLabel | 
|---|
|  | 19 | Left = 6 | 
|---|
|  | 20 | Top = 67 | 
|---|
|  | 21 | Width = 175 | 
|---|
|  | 22 | Height = 13 | 
|---|
|  | 23 | Caption = 'Select from one of the following items' | 
|---|
|  | 24 | Visible = False | 
|---|
|  | 25 | end | 
|---|
|  | 26 | object txtSearch: TCaptionEdit | 
|---|
|  | 27 | Left = 6 | 
|---|
|  | 28 | Top = 30 | 
|---|
|  | 29 | Width = 331 | 
|---|
|  | 30 | Height = 21 | 
|---|
|  | 31 | TabOrder = 0 | 
|---|
|  | 32 | OnChange = txtSearchChange | 
|---|
|  | 33 | Caption = 'Search for Diagnosis' | 
|---|
|  | 34 | end | 
|---|
|  | 35 | object cmdSearch: TButton | 
|---|
|  | 36 | Left = 346 | 
|---|
|  | 37 | Top = 30 | 
|---|
|  | 38 | Width = 75 | 
|---|
|  | 39 | Height = 21 | 
|---|
|  | 40 | Caption = 'Search' | 
|---|
|  | 41 | Default = True | 
|---|
|  | 42 | TabOrder = 1 | 
|---|
|  | 43 | OnClick = cmdSearchClick | 
|---|
|  | 44 | end | 
|---|
|  | 45 | object cmdOK: TButton | 
|---|
|  | 46 | Left = 263 | 
|---|
|  | 47 | Top = 245 | 
|---|
|  | 48 | Width = 75 | 
|---|
|  | 49 | Height = 22 | 
|---|
|  | 50 | Caption = 'OK' | 
|---|
|  | 51 | TabOrder = 3 | 
|---|
|  | 52 | OnClick = cmdOKClick | 
|---|
|  | 53 | end | 
|---|
|  | 54 | object cmdCancel: TButton | 
|---|
|  | 55 | Left = 346 | 
|---|
|  | 56 | Top = 245 | 
|---|
|  | 57 | Width = 75 | 
|---|
|  | 58 | Height = 22 | 
|---|
|  | 59 | Cancel = True | 
|---|
|  | 60 | Caption = 'Cancel' | 
|---|
|  | 61 | TabOrder = 4 | 
|---|
|  | 62 | OnClick = cmdCancelClick | 
|---|
|  | 63 | end | 
|---|
|  | 64 | object lstSelect: TORListBox | 
|---|
|  | 65 | Left = 6 | 
|---|
|  | 66 | Top = 81 | 
|---|
|  | 67 | Width = 415 | 
|---|
|  | 68 | Height = 156 | 
|---|
|  | 69 | ItemHeight = 13 | 
|---|
|  | 70 | ParentShowHint = False | 
|---|
|  | 71 | ShowHint = True | 
|---|
|  | 72 | TabOrder = 2 | 
|---|
|  | 73 | OnClick = lstSelectClick | 
|---|
|  | 74 | OnDblClick = lstSelectDblClick | 
|---|
|  | 75 | Caption = 'Select from one of the following items' | 
|---|
|  | 76 | ItemTipColor = clWindow | 
|---|
|  | 77 | LongList = False | 
|---|
|  | 78 | Pieces = '2' | 
|---|
|  | 79 | end | 
|---|
|  | 80 | end | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.