main.dfm

实现RS232数据采集处理,设置RS23传输参数,显示控制终端的数据.

              00000000FF0000000000FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFF
              FF0000000000000000000000FF0000000000FF00FF00FF00FF00FF00FF000000
              00000000FF000000FF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFF
              FF00FFFFFF000000FF000000FF0000000000FF00FF00FF00FF00FF00FF007F7F
              7F00000000000000FF00BFBFBF0000000000FFFFFF0000000000FFFFFF000000
              0000BFBFBF000000FF00000000007F7F7F00FF00FF00FF00FF00FF00FF00FF00
              FF0000000000000000000000FF00BFBFBF00FFFFFF0000000000FFFFFF00BFBF
              BF000000FF000000000000000000FF00FF00FF00FF00FF00FF00000000000000
              00000000000000000000000000000000FF000000FF000000FF000000FF000000
              FF000000000000000000000000000000000000000000FF00FF0000000000BFBF
              BF00BFBFBF007F7F7F0000000000000000000000000000000000000000000000
              000000000000BFBFBF007F7F7F007F7F7F0000000000FF00FF0000000000BFBF
              BF00BFBFBF00BFBFBF00BFBFBF007F7F7F007F7F7F00000000007F7F7F00BFBF
              BF00BFBFBF00BFBFBF00BFBFBF007F7F7F0000000000FF00FF00FF00FF000000
              00007F7F7F00BFBFBF00BFBFBF00000000007F7F7F00000000007F7F7F000000
              0000BFBFBF00BFBFBF007F7F7F0000000000FF00FF00FF00FF00FF00FF00FF00
              FF007F7F7F000000000000000000FF00FF00FF00FF0000000000FF00FF00FF00
              FF0000000000000000007F7F7F00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00000000000000000000000000FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
          end
          object BitBtn18: TBitBtn
            Left = 272
            Top = 72
            Width = 145
            Height = 25
            Action = ActionStop
            Caption = '停止监控(&P)'
            TabOrder = 3
            Glyph.Data = {
              36040000424D3604000000000000360000002800000010000000100000000100
              2000000000000004000000000000000000000000000000000000FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF000000FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF000000FF000000FF000000FF000000FF000000FF000000FF000000
              FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF000000
              FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF000000
              FF00FF00FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF000000FF000000FF00FF00FF00FF00FF000000FF000000
              FF00FF00FF00FF00FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF00FF00FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF000000FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF00FF00FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF00FF00FF000000FF000000FF000000FF00FF00
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF00FF00FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF00FF00FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000FF000000
              FF000000FF00FF00FF00FF00FF000000FF000000FF00FF00FF00FF00FF000000
              FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
              FF000000FF000000FF00FF00FF000000FF00FF00FF00FF00FF00FF00FF000000
              FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF000000FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00
              FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF000000FF000000FF000000FF000000FF000000FF000000FF000000
              FF000000FF000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
              FF00FF00FF00FF00FF00FF00FF000000FF000000FF000000FF000000FF000000
              FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
          end
          object Edit4: TEdit
            Left = 32
            Top = 48
            Width = 185
            Height = 28
            ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
            ReadOnly = True
            TabOrder = 4
          end
          object Memo1: TMemo
            Left = 32
            Top = 104
            Width = 185
            Height = 329
            ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
            ReadOnly = True
            ScrollBars = ssVertical
            TabOrder = 5
            OnChange = Memo1Change
          end
          object Memo2: TMemo
            Left = 552
            Top = 104
            Width = 193
            Height = 329
            ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
            ReadOnly = True
            ScrollBars = ssVertical
            TabOrder = 6
            OnChange = Memo2Change
          end
          object Edit3: TEdit
            Left = 552
            Top = 48
            Width = 193
            Height = 28
            ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
            ReadOnly = True
            TabOrder = 7
          end
          object StaticText9: TStaticText
            Left = 552
            Top = 80
            Width = 66
            Height = 24
            Caption = 'Rx Data:'
            TabOrder = 8
          end
          object StaticText7: TStaticText
            Left = 552
            Top = 16
            Width = 69
            Height = 24
            Caption = 'Rx INFO:'
            TabOrder = 9
          end
          object StaticText8: TStaticText
            Left = 32
            Top = 80
            Width = 101
            Height = 24
            Caption = 'Tx Command:'
            TabOrder = 10
            Visible = False
          end
          object StaticText6: TStaticText
            Left = 32
            Top = 16
            Width = 66
            Height = 24
            Caption = 'Tx INFO:'
            TabOrder = 11
          end
        end
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 671
    Width = 1000
    Height = 19
    Panels = <
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 1000
    Height = 41
    ButtonHeight = 31
    ButtonWidth = 33
    Caption = 'ToolBar1'
    Images = ImageList1
    TabOrder = 0
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      Hint = '空调参数设置'
      Action = ActionADSet
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton2: TToolButton
      Left = 33
      Top = 2
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object ToolButton3: TToolButton
      Left = 41
      Top = 2
      Hint = '空调参数获取'
      Caption = '空调参数获取'
      ImageIndex = 14
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton3Click
    end
    object ToolButton4: TToolButton
      Left = 74
      Top = 2
      Hint = '串口设置'
      Action = ActionComm
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton5: TToolButton
      Left = 107
      Top = 2
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ToolButton6: TToolButton
      Left = 115
      Top = 2
      Hint = '自动运行'
      Action = ActionRun
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton7: TToolButton
      Left = 148
      Top = 2
      Hint = '停止自动运行'
      Action = ActionStop
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton8: TToolButton
      Left = 181
      Top = 2
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 5
      Style = tbsSeparator
    end
    object ToolButton9: TToolButton
      Left = 189
      Top = 2
      Hint = '添加设备'
      Action = ActionAdd
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton10: TToolButton
      Left = 222
      Top = 2
      Hint = '卸载设备'
      Action = ActionDel
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton11: TToolButton
      Left = 255
      Top = 2
      Width = 8
      Caption = 'ToolButton11'
      ImageIndex = 7
      Style = tbsSeparator
    end
    object ToolButton12: TToolButton
      Left = 263
      Top = 2
      Hint = '退出系统'
      Action = ActionClose
      ParentShowHint = False
      ShowHint = True
    end
  end
  object ScrollBox2: TScrollBox
    Left = 0
    Top = 41
    Width = 1000
    Height = 96
    Align = alTop
    TabOrder = 1
    object Splitter8: TSplitter
      Left = 169
      Top = 0
      Width = 3
      Height = 92
      Cursor = crHSplit
    end
    object Splitter9: TSplitter
      Left = 861
      Top = 0
      Width = 3
      Height = 92
      Cursor = crHSplit
      Align = alRight
    end
    object GroupBox4: TGroupBox
      Left = 352
      Top = 8
      Width = 601
      Height = 63
      Caption = '简单通讯设置'
      TabOrder = 0
      Visible = False
      object ComboBox1: TComboBox
        Left = 72
        Top = 24
        Width = 89
        Height = 21
        ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
        ItemHeight = 13
        TabOrder = 0
        Text = 'COM1'
        Items.Strings = (
          'COM1'
          'COM2'
          'COM3'
          'COM4'
          'COM5')
      end
      object StaticText4: TStaticText
        Left = 8
        Top = 24
        Width = 64
        Height = 17
        Caption = '串口选择：'
        TabOrder = 1
      end
      object BitBtn13: TBitBtn
        Left = 320
        Top = 24
        Width = 75
        Height = 25
        Caption = '打开串口'
        TabOrder = 2
        OnClick = BitBtn13Click
      end
      object BitBtn14: TBitBtn
        Left = 408
        Top = 24
        Width = 75
        Height = 25
        Caption = '关闭串口'
        TabOrder = 3
        OnClick = BitBtn14Click
      end
      object BitBtn15: TBitBtn
        Left = 400
        Top = 48
        Width = 75
        Height = 25
        Action = ActionComm
        Caption = '详细设置'
        TabOrder = 4
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000FFFFFF00FFFFFF0000000000FF00
          FF00FF00FF000000FF00000080000000FF00FF00FF0000000000FF00FF007F7F
          7F00000000000000000000000000FFFFFF00FFFFFF0000000000FF00FF00FF00
          FF00FF00FF000000FF00000080000000FF0000000000008080007F7F7F000000
          0000FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00
          FF00FF00FF000000FF00000080000000FF00008080000080800000000000FFFF
          FF000000000000000000FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00
          FF00FF00FF000000FF00000080000000FF000080800000808000000000000000
          0000FF00FF00FF00FF0000000000FFFFFF0000000000FF00FF00FF00FF00FF00
          FF00FF00FF000000FF00000080000000FF0000808000FF00FF00000000007F7F
          7F00FF00FF00FF00FF0000000000FFFFFF0000000000FF00FF00FF00FF00FF00
          FF000000FF000000FF000000FF000000FF000000FF00FF00FF00FF00FF00FF00
          FF007F7F7F0000000000FFFFFF00000000007F7F7F00FF00FF00FF00FF000000
          00000000800000008000000080000000800000008000FF00FF00FF00FF00FF00
          FF000000000000000000000000007F7F7F00FF00FF00FF00FF00000000000080
          8000008080000080800000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000008080000080
          800000808000FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF000000000000000000FF00FF00FF00FF000000000000808000008080000080
          8000FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00FF000000
          0000FF00FF0000000000FF00FF0000000000008080000080800000808000FF00
          FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF0000000000FF00
          FF00000000000000000000000000008080000080800000808000FF00FF00FF00
          FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00000000000000
          00000000000000000000000000000000000000808000FF00FF00FF00FF00FF00
          FF00FF00FF007F7F7F00000000007F7F7F00FF00FF00FF00FF00FF00FF00FF00
          FF000000000000000000000000000000000000000000FF00FF00FF00FF00FF00
          FF00FF00FF007F7F7F00000000007F7F7F