setu.dfm

这是个16路采集器的上位机源码。该套程序是由C++builder开发的

      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox21: TComboBox
      Left = 344
      Top = 0
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit38: TEdit
      Left = 190
      Top = 0
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P5: TEdit
      Left = 464
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P5: TEdit
      Left = 536
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel6: TPanel
    Left = 32
    Top = 208
    Width = 609
    Height = 25
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 5
    object Label6: TLabel
      Left = 16
      Top = 0
      Width = 36
      Height = 13
      Caption = #36890#36947'6  '
    end
    object Edit11: TEdit
      Left = 56
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit12: TEdit
      Left = 124
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox6: TComboBox
      Left = 232
      Top = 0
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox22: TComboBox
      Left = 344
      Top = 0
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit39: TEdit
      Left = 190
      Top = 0
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P6: TEdit
      Left = 464
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P6: TEdit
      Left = 536
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel7: TPanel
    Left = 32
    Top = 232
    Width = 609
    Height = 25
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 6
    object Label7: TLabel
      Left = 16
      Top = 0
      Width = 36
      Height = 13
      Caption = #36890#36947'7  '
    end
    object Edit13: TEdit
      Left = 56
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit14: TEdit
      Left = 124
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox7: TComboBox
      Left = 232
      Top = 0
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox23: TComboBox
      Left = 344
      Top = 0
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit40: TEdit
      Left = 190
      Top = 0
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P7: TEdit
      Left = 464
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P7: TEdit
      Left = 536
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel9: TPanel
    Left = 32
    Top = 288
    Width = 609
    Height = 33
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 7
    object Label9: TLabel
      Left = 8
      Top = 8
      Width = 36
      Height = 13
      Caption = #36890#36947'9  '
    end
    object Edit17: TEdit
      Left = 56
      Top = 8
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit18: TEdit
      Left = 124
      Top = 8
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox9: TComboBox
      Left = 232
      Top = 8
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox25: TComboBox
      Left = 344
      Top = 8
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit42: TEdit
      Left = 190
      Top = 8
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P9: TEdit
      Left = 464
      Top = 14
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P9: TEdit
      Left = 536
      Top = 14
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel10: TPanel
    Left = 32
    Top = 320
    Width = 609
    Height = 25
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 8
    object Label10: TLabel
      Left = 8
      Top = 0
      Width = 42
      Height = 13
      Caption = #36890#36947'10  '
    end
    object Edit19: TEdit
      Left = 56
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit20: TEdit
      Left = 124
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox10: TComboBox
      Left = 232
      Top = 0
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox26: TComboBox
      Left = 344
      Top = 0
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit43: TEdit
      Left = 190
      Top = 0
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P10: TEdit
      Left = 464
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P10: TEdit
      Left = 536
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel11: TPanel
    Left = 32
    Top = 344
    Width = 609
    Height = 25
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 9
    object Label11: TLabel
      Left = 8
      Top = 0
      Width = 42
      Height = 13
      Caption = #36890#36947'11  '
    end
    object Edit21: TEdit
      Left = 56
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit22: TEdit
      Left = 124
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox11: TComboBox
      Left = 232
      Top = 0
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #30005#21387#65288'V'#65289
      Items.Strings = (
        #30005#21387#65288'V'#65289
        #30005#27969#65288'mA'#65289
        #28201#24230#65288#8451#65289
        #28287#24230#65288#65285#65289
        #21387#21147#65288'KPa'#65289
        '')
    end
    object ComboBox27: TComboBox
      Left = 344
      Top = 0
      Width = 105
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = '0~5V'
      Items.Strings = (
        '0~5V'
        '0~10V'
        '-5~5V'
        '1~5V')
    end
    object Edit44: TEdit
      Left = 190
      Top = 0
      Width = 33
      Height = 19
      TabOrder = 4
      Text = '0'
    end
    object Edt_SetVal_P11: TEdit
      Left = 464
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 5
    end
    object Edt_RetSetVal_P11: TEdit
      Left = 536
      Top = 6
      Width = 65
      Height = 19
      TabOrder = 6
    end
  end
  object Panel12: TPanel
    Left = 32
    Top = 368
    Width = 609
    Height = 25
    BevelOuter = bvNone
    Color = clSkyBlue
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 10
    object Label12: TLabel
      Left = 8
      Top = 0
      Width = 42
      Height = 13
      Caption = #36890#36947'12  '
    end
    object Edit23: TEdit
      Left = 56
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 0
      Text = '0'
    end
    object Edit24: TEdit
      Left = 124
      Top = 0
      Width = 60
      Height = 19
      TabOrder = 1
      Text = '5'
    end
    object ComboBox12: TComboBox
      Left = 232
      Top = 0
      Width = 105
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2