harmware.~dfm

能对电子式电能表通过485接口进行通讯测试的软件

inherited HarmForm: THarmForm
  Left = 231
  Top = 91
  Caption = #35856#27874#34920#25193#23637#21327#35758
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited FlatPanel1: TFlatPanel
    inherited FEB_Read: TFlatSpeedButton
      OnClick = FEB_ReadClick
    end
    inherited FEB_Write: TFlatSpeedButton
      OnClick = FEB_WriteClick
    end
    inherited FSB_Stop: TFlatSpeedButton
      OnClick = FSB_StopClick
    end
  end
  inherited PageControl: TPageControl
    Height = 447
    TabHeight = 25
    inherited TabSheet1: TTabSheet
      inherited SelectAll_CB0: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
      inherited FlatGroupBox1: TFlatGroupBox
        inherited ChEdit_LoseVTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_OverVTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_OweVTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_DXVTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_NLoseVBut: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_BerrVTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_DissVTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_DisBanVTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
      end
      inherited FlatGroupBox2: TFlatGroupBox
        inherited ChEdit_DLCTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_DLCBut: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_GDlTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_BigCTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_NoVolTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_BerrCTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_DisCTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_DisBanCTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
      end
      inherited FlatGroupBox3: TFlatGroupBox
        Top = 316
        Height = 87
        inherited ChEdit_DemTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_DemBerrTop: TCheckedEdit
          Tag = 2
          MaxLength = 4
        end
        inherited ChEdit_PowerFacTop: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
        inherited ChEdit_Judge: TCheckedEdit
          Tag = 1
          MaxLength = 2
        end
      end
    end
    inherited TabSheet_Elect: TTabSheet
      Tag = 4
      inherited SelectAll_CB1: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
    end
    inherited TabSheet3: TTabSheet
      inherited SelectAll_CB2: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
      inherited GB_FormerDelay: TFlatGroupBox
        inherited ChEdit_FormerS: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_FormerG: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_FormerQ: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_FormerDX: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_FormerDL: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_FormerGDL: TCheckedEdit
          MaxLength = 4
        end
      end
      inherited GB_LatterDelay: TFlatGroupBox
        inherited ChEdit_LatterS: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_LatterG: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_LatterQ: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_LatterDX: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_LatterDL: TCheckedEdit
          MaxLength = 4
        end
        inherited ChEdit_LatterGDL: TCheckedEdit
          MaxLength = 4
        end
      end
    end
    inherited TabSheet4: TTabSheet
      inherited SelectAll_CB3: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
    end
    inherited TabSheet5: TTabSheet
      inherited TV_BreadPos: TTreeView
        Height = 412
        OnChange = TV_BreadPosChange
        OnClick = TV_BreadPosClick
      end
    end
    inherited TabSheet2: TTabSheet
      inherited SelectAll_Break: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
    end
    inherited TabSheet6: TTabSheet
      inherited FE_ItemName: TFlatEdit
        Width = 237
      end
      inherited SelectAll_CB5: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
      inherited ChEdit_Time7: TCheckedEdit
        TabOrder = 16
        CheckBox.TabOrder = 17
      end
      inherited TV_Event: TTreeView
        Height = 412
        OnChange = TV_EventChange
        OnClick = TV_EventClick
      end
    end
    inherited TabSheet7: TTabSheet
      inherited Label14: TLabel
        Visible = False
      end
      inherited Label15: TLabel
        Top = 32
      end
      inherited Label49: TLabel
        Top = 64
      end
      inherited FE_Time: TFlatEdit
        Top = 32
      end
      inherited FE_Block: TFlatEdit
        Visible = False
      end
      inherited FE_Squence: TFlatEdit
        Top = 64
      end
    end
    inherited TabSheet8: TTabSheet
      inherited FlatGroupBox18: TFlatGroupBox
        inherited ChEdit_RepairAR: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairBR: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairCR: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairAB: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairCB: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairBB: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairAX: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairCX: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairBX: TFlatEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairAG: TCheckedEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairBG: TCheckedEdit
          MaxLength = 8
        end
        inherited ChEdit_RepairCG: TCheckedEdit
          MaxLength = 8
        end
      end
      inherited SelectAll_CB7: TFlatCheckBox
        OnClick = SelectAll_CB0Click
      end
      inherited ChEdit_RecSpace7: TCheckedEdit
        MaxLength = 4
      end
      inherited ChEdit_RecSpace8: TCheckedEdit
        MaxLength = 4
      end
      inherited ChEdit_RecSpace9: TCheckedEdit
        MaxLength = 4
      end
      inherited FlatGroupBox11: TFlatGroupBox
        inherited CB_Byte0: TFlatComboBox
          OnChange = CB_Byte3Change
        end
        inherited CB_Byte1: TFlatComboBox
          OnChange = CB_Byte3Change
        end
        inherited CB_Byte2: TFlatComboBox
          OnChange = CB_Byte3Change
        end
        inherited CB_Byte3: TFlatComboBox
          OnChange = CB_Byte3Change
        end
      end
    end
  end
  inherited RichEdit: TListBox
    Top = 488
    Height = 63
    OnDblClick = RichEditDblClick
  end
  inherited shqDl645: TshqDl645
    Left = 24
    Top = 8
  end
  inherited cpGeneralWrite: TcpGeneralWrite
    Left = 64
    Top = 8
  end
  inherited Comm: TComm
    OnReceiveData = CommReceiveData
  end
end