Ignore:
Timestamp:
Jul 7, 2010, 4:31:10 PM (14 years ago)
Author:
Kevin Toppenberg
Message:

Upgrade to version 27

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cprs/trunk/CPRS-Chart/Encounter/fDiagnoses.dfm

    r456 r829  
    55  PixelsPerInch = 96
    66  TextHeight = 13
    7   object lblAdd2PL: TLabel [0]
    8     Left = 555
    9     Top = 255
    10     Width = 53
    11     Height = 26
    12     Caption = 'Add to Problem list'
    13     WordWrap = True
    14   end
    157  inherited lblSection: TLabel
    168    Width = 89
    179    Caption = 'Diagnoses Section'
     10    ExplicitWidth = 89
    1811  end
    1912  inherited btnOK: TBitBtn
     
    2619    Width = 523
    2720    TabOrder = 1
     21    ExplicitWidth = 523
    2822    inherited lbGrid: TORListBox
    2923      Tag = 20
    3024      Width = 523
    3125      Pieces = '1,2,3'
     26      ExplicitWidth = 523
    3227    end
    3328    inherited hcGrid: THeaderControl
     
    5247          Width = 110
    5348        end>
     49      ExplicitWidth = 523
    5450    end
    5551  end
    5652  inherited edtComment: TCaptionEdit
    5753    TabOrder = 3
     54  end
     55  object cmdDiagPrimary: TButton [8]
     56    Left = 536
     57    Top = 306
     58    Width = 75
     59    Height = 21
     60    Caption = 'Primary'
     61    Enabled = False
     62    TabOrder = 5
     63    OnClick = cmdDiagPrimaryClick
     64  end
     65  object ckbDiagProb: TCheckBox [9]
     66    Left = 535
     67    Top = 258
     68    Width = 76
     69    Height = 38
     70    Caption = 'Add to Problem list'
     71    TabOrder = 4
     72    WordWrap = True
     73    OnClick = ckbDiagProbClicked
    5874  end
    5975  inherited btnRemove: TButton
     
    6480    TabOrder = 2
    6581    TabStop = True
     82    ExplicitLeft = 454
    6683  end
    6784  inherited pnlMain: TPanel
     
    7289      IntegralHeight = True
    7390      Pieces = '2,3,4,5'
     91      ExplicitHeight = 196
    7492    end
    7593    inherited pnlLeft: TPanel
     
    85103    end
    86104  end
    87   object cmdDiagPrimary: TButton
    88     Left = 536
    89     Top = 306
    90     Width = 75
    91     Height = 21
    92     Caption = 'Primary'
    93     Enabled = False
    94     TabOrder = 5
    95     OnClick = cmdDiagPrimaryClick
    96   end
    97   object ckbDiagProb: TCheckBox
    98     Left = 536
    99     Top = 262
    100     Width = 13
    101     Height = 13
    102     Caption = 'Add to Problem list'
    103     TabOrder = 4
    104     OnClick = ckbDiagProbClicked
     105  inherited amgrMain: TVA508AccessibilityManager
     106    Data = (
     107      (
     108        'Component = cmdDiagPrimary'
     109        'Status = stsDefault')
     110      (
     111        'Component = ckbDiagProb'
     112        'Status = stsDefault')
     113      (
     114        'Component = edtComment'
     115        'Label = lblComment'
     116        'Status = stsOK')
     117      (
     118        'Component = btnRemove'
     119        'Status = stsDefault')
     120      (
     121        'Component = btnSelectAll'
     122        'Status = stsDefault')
     123      (
     124        'Component = pnlMain'
     125        'Status = stsDefault')
     126      (
     127        'Component = lbxSection'
     128        'Label = lblList'
     129        'Status = stsOK')
     130      (
     131        'Component = pnlLeft'
     132        'Status = stsDefault')
     133      (
     134        'Component = lbSection'
     135        'Label = lblSection'
     136        'Status = stsOK')
     137      (
     138        'Component = btnOther'
     139        'Status = stsDefault')
     140      (
     141        'Component = pnlGrid'
     142        'Status = stsDefault')
     143      (
     144        'Component = lbGrid'
     145        'Status = stsDefault')
     146      (
     147        'Component = hcGrid'
     148        'Status = stsDefault')
     149      (
     150        'Component = btnOK'
     151        'Status = stsDefault')
     152      (
     153        'Component = btnCancel'
     154        'Status = stsDefault')
     155      (
     156        'Component = frmDiagnoses'
     157        'Status = stsDefault'))
    105158  end
    106159end
Note: See TracChangeset for help on using the changeset viewer.