⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 econv230p.~dfm

📁 自已用DELPHI编写的MODBUS测试软件及源代码
💻 ~DFM
📖 第 1 页 / 共 2 页
字号:
object MainForm: TMainForm
  Left = 124
  Top = 79
  Width = 884
  Height = 672
  Caption = '易控微网科技产品测试软件V2.30     '
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -9
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = False
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object PAGECON: TPageControl
    Left = 0
    Top = 0
    Width = 876
    Height = 608
    ActivePage = COILSTATE
    Align = alClient
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    HotTrack = True
    ParentFont = False
    Style = tsButtons
    TabOrder = 0
    Visible = False
    object COILSTATE: TTabSheet
      Caption = '继电器状态'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      object coilstategrid: TStringGrid
        Left = 0
        Top = 0
        Width = 868
        Height = 578
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 15
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ScrollBars = ssVertical
        ShowHint = True
        TabOrder = 0
        OnSelectCell = coilstategridSelectCell
        ColWidths = (
          86
          330
          248)
      end
    end
    object INPUTSTATE: TTabSheet
      Caption = '输入状态'
      object inputstategrid: TStringGrid
        Left = 0
        Top = 0
        Width = 849
        Height = 538
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 15
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
        ScrollBars = ssVertical
        TabOrder = 0
        ColWidths = (
          86
          330
          249)
        RowHeights = (
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24
          24)
      end
    end
    object HOLDREGISTER: TTabSheet
      Caption = '保持寄存器'
      ImageIndex = 2
      object holdregistergrid: TStringGrid
        Left = 0
        Top = 0
        Width = 740
        Height = 540
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 15
        ScrollBars = ssVertical
        TabOrder = 0
        OnSelectCell = holdregistergridSelectCell
        ColWidths = (
          86
          330
          249)
      end
    end
    object INPUTREGISTER: TTabSheet
      Caption = '输入寄存器'
      ImageIndex = 3
      object inputregistergrid: TStringGrid
        Left = 0
        Top = 0
        Width = 868
        Height = 578
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 15
        TabOrder = 0
        OnSelectCell = inputregistergridSelectCell
        ColWidths = (
          86
          330
          249)
      end
    end
    object PROTECT: TTabSheet
      Caption = '保护'
      ImageIndex = 4
      object protectgrid: TStringGrid
        Left = 0
        Top = 0
        Width = 849
        Height = 538
        Align = alClient
        Color = clInfoBk
        ColCount = 9
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 15
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnSelectCell = protectgridSelectCell
        ColWidths = (
          29
          127
          139
          45
          119
          57
          158
          57
          98)
      end
    end
    object POWER: TTabSheet
      Caption = '电度'
      ImageIndex = 8
      object PowerGrid: TStringGrid
        Left = 0
        Top = 0
        Width = 740
        Height = 540
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 250
        FixedColor = clYellow
        FixedCols = 0
        TabOrder = 0
        OnSelectCell = PowerGridSelectCell
        ColWidths = (
          86
          330
          249)
      end
    end
    object COMMUNICATION: TTabSheet
      Caption = '通讯'
      ImageIndex = 7
      object sendmemo: TMemo
        Left = 0
        Top = 0
        Width = 167
        Height = 297
        Color = clInfoBk
        Lines.Strings = (
          '发送窗口')
        TabOrder = 0
      end
      object revmemo: TMemo
        Left = 166
        Top = 0
        Width = 851
        Height = 297
        Color = clInfoBk
        Lines.Strings = (
          '接收窗口')
        TabOrder = 1
      end
      object eventmemo: TMemo
        Left = 0
        Top = 296
        Width = 1017
        Height = 361
        Color = clInfoBk
        ScrollBars = ssVertical
        TabOrder = 2
      end
    end
    object DATADEF: TTabSheet
      Caption = '数据定义'
      ImageIndex = 7
      object datamemo: TMemo
        Left = 0
        Top = 0
        Width = 868
        Height = 578
        Align = alClient
        Color = clInfoBk
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        PopupMenu = PopupMenu1
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
      end
    end
    object TESTRPT: TTabSheet
      Caption = '测试报告'
      ImageIndex = 10
      object Splitter1: TSplitter
        Left = 0
        Top = 0
        Width = 849
        Height = 41
        Cursor = crArrow
        Align = alTop
        AutoSnap = False
        Beveled = True
        Color = clInfoBk
        MinSize = 10
        ParentColor = False
        ResizeStyle = rsNone
      end
      object testrptmemo: TMemo
        Left = 0
        Top = 41
        Width = 849
        Height = 496
        Align = alClient
        Color = clInfoBk
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ScrollBars = ssBoth
        TabOrder = 0
      end
      object rptbtn: TBitBtn
        Left = 8
        Top = 8
        Width = 73
        Height = 25
        Caption = '生成报告'
        TabOrder = 1
        OnClick = rptbtnClick
      end
      object saverptbtn: TBitBtn
        Left = 168
        Top = 8
        Width = 75
        Height = 25
        Caption = '保存'
        TabOrder = 2
        OnClick = saverptbtnClick
      end
      object ClrRptBtn: TBitBtn
        Left = 88
        Top = 8
        Width = 75
        Height = 25
        Caption = '清除报告'
        TabOrder = 3
        OnClick = ClrRptBtnClick
      end
    end
    object XIANGLIANG: TTabSheet
      Caption = '相量图'
      ImageIndex = 9
      object Splitter2: TSplitter
        Left = 0
        Top = 185
        Width = 623
        Height = 8
        Cursor = crHSplit
        Align = alNone
        MinSize = 10
      end
      object xianglianggrid: TStringGrid
        Left = 0
        Top = 394
        Width = 849
        Height = 143
        Align = alBottom
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 7
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
        ScrollBars = ssVertical
        TabOrder = 0
        ColWidths = (
          68
          200
          200)
        RowHeights = (
          24
          24
          24
          24
          24
          24
          24)
      end
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 849
        Height = 394
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Color = clInfoBk
        TabOrder = 1
        object Image1: TImage
          Left = 2
          Top = 2
          Width = 845
          Height = 390
          Align = alClient
          AutoSize = True
        end
      end
    end
    object XIEBO: TTabSheet
      Caption = '谐波显示'
      ImageIndex = 11
      object XieBoGrid: TStringGrid
        Left = 0
        Top = 0
        Width = 740
        Height = 540
        Align = alClient
        Color = clInfoBk
        ColCount = 3
        DefaultColWidth = 200
        FixedColor = clYellow
        FixedCols = 0
        RowCount = 43
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        ColWidths = (
          86
          330
          249)
      end
    end
    object HELP: TTabSheet
      Caption = '帮助'
      ImageIndex = 8
      object helpMemo: TMemo
        Left = 0
        Top = 0
        Width = 740
        Height = 540
        Align = alClient
        Color = clInfoBk
        PopupMenu = PopupMenu2
        ScrollBars = ssBoth
        TabOrder = 0
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 608
    Width = 876
    Height = 17
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object MainMenu: TMainMenu
    Left = 516
    Top = 434
    object m_rtutpye: TMenuItem
      Caption = '终端类型'
      object fileopen: TMenuItem
        Caption = 'open'
        OnClick = fileopenClick
      end
    end
    object m_comset: TMenuItem
      Caption = '通讯设置'
      Enabled = False
      object m_baudrate: TMenuItem
        Caption = '波特率'
        object b110: TMenuItem
          Caption = '110'
          RadioItem = True
          OnClick = b110Click
        end
        object b300: TMenuItem

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -