| 
            Last change
 on this file since 1764 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.