dpcon.dfm

Delphi通讯源码。可给做通讯的朋友参考。

        TabOrder = 6
        OnChange = edtPortnameChange
      end
      object edtPassword: TEdit
        Tag = 6
        Left = 385
        Top = 182
        Width = 131
        Height = 20
        Enabled = False
        TabOrder = 7
        OnChange = edtPortnameChange
      end
      object cmbEncode: TComboBox
        Left = 385
        Top = 228
        Width = 97
        Height = 22
        Style = csOwnerDrawFixed
        Enabled = False
        ItemHeight = 16
        ItemIndex = 0
        TabOrder = 9
        Text = 'English'
        OnChange = cmbEncodeChange
        Items.Strings = (
          'English'
          'Chinese GB'
          'Chinese BIG5')
      end
      object edtDescription: TEdit
        Tag = 9
        Left = 385
        Top = 251
        Width = 131
        Height = 20
        Enabled = False
        TabOrder = 10
        OnChange = edtPortnameChange
      end
      object edtReserve: TEdit
        Tag = 10
        Left = 385
        Top = 275
        Width = 131
        Height = 20
        Enabled = False
        TabOrder = 11
        OnChange = edtPortnameChange
      end
      object btPAdd: TButton
        Left = 281
        Top = 301
        Width = 75
        Height = 21
        Caption = 'Add'
        TabOrder = 12
        OnClick = btPAddClick
      end
      object btPDel: TButton
        Left = 361
        Top = 301
        Width = 75
        Height = 21
        Caption = 'Del'
        TabOrder = 13
        OnClick = btPDelClick
      end
      object btpRefresh: TButton
        Left = 441
        Top = 301
        Width = 75
        Height = 21
        Caption = 'Refresh'
        TabOrder = 14
        OnClick = btpRefreshClick
      end
      object edtport: TSpinEdit
        Tag = 3
        Left = 385
        Top = 112
        Width = 58
        Height = 21
        Enabled = False
        MaxValue = 99999
        MinValue = 0
        TabOrder = 4
        Value = 0
        OnChange = edtPortnameChange
      end
      object edtTimeout: TSpinEdit
        Tag = 4
        Left = 385
        Top = 136
        Width = 58
        Height = 21
        Enabled = False
        MaxValue = 600
        MinValue = 0
        TabOrder = 5
        Value = 0
        OnChange = edtPortnameChange
      end
      object edtInterval: TSpinEdit
        Tag = 7
        Left = 385
        Top = 205
        Width = 58
        Height = 21
        Enabled = False
        MaxValue = 99999
        MinValue = 1
        TabOrder = 8
        Value = 1
        OnChange = edtPortnameChange
      end
    end
    object TabQueue: TTabSheet
      Caption = 'Queue'
      ImageIndex = 3
      OnShow = TabQueueShow
      object Image6: TImage
        Left = 16
        Top = 9
        Width = 32
        Height = 32
        AutoSize = True
        Picture.Data = {
          055449636F6E0000010001002020000000000000A80800001600000028000000
          2000000040000000010008000000000080040000000000000000000000000000
          00000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00CEFFFF00CEFFFF00
          CEFFFF00CEFFFF009CFFFF009CFFFF009CFFFF0063FFFF0063FFFF0063FFFF00
          31FFFF0031FFFF0031FFFF0000FFFF0000FFFF0000FFFF0000FFFF009CCEFF00
          9CCEFF009CCEFF0063CEFF0063CEFF0063CEFF00639CFF00639CFF00639CFF00
          3163FF003163FF003163FF000063FF000063FF000063FF003131FF003131FF00
          3131FF000031FF000031FF000031FF000031FF00EFEFEF00EFEFEF00EFEFEF00
          EFEFEF00DEDEDE00DEDEDE00DEDEDE00DEDEDE000000DE000000DE000000DE00
          0000DE00FFCECE00FFCECE00FFCECE00FFCECE00CECECE00CECECE00CECECE00
          639CCE00639CCE00639CCE00639CCE003163CE003163CE003163CE003131CE00
          3131CE003131CE000031CE000031CE000031CE00BDBDBD00BDBDBD00BDBDBD00
          ADADAD00ADADAD00ADADAD00ADADAD00FFFF9C00FFFF9C00FFFF9C00CECE9C00
          CECE9C00CECE9C009CCE9C009CCE9C009CCE9C00FF9C9C00FF9C9C00FF9C9C00
          CE9C9C00CE9C9C00CE9C9C009C9C9C009C9C9C009C9C9C009C639C009C639C00
          9C639C009C639C0063639C0063639C0063639C0031639C0031639C0031639C00
          31639C0031319C0031319C0031319C0000319C0000319C0000319C0000319C00
          63009C0063009C0063009C0063009C008C8C8C008C8C8C008C8C8C008C8C8C00
          7373730073737300737373007373730000007300000073000000730000007300
          CE9C6300CE9C6300CE9C6300CE9C63009C9C63009C9C63009C9C6300CE636300
          CE636300CE636300CE6363006363630063636300636363003163630031636300
          3163630031316300313163003131630000316300003163000031630031006300
          3100630031006300525252005252520052525200424242004242420042424200
          424242000000420000004200000042009CFF31009CFF31009CFF31009CFF3100
          639C3100639C3100639C3100639C31006363310063633100636331009C313100
          9C3131009C3131009C3131006331310063313100633131006331310031313100
          31313100313131000031310000313100003131009C0031009C0031009C003100
          9C00310031003100310031003100310000003100000031000000310000003100
          2121210021212100212121000000210000002100000021001010100010101000
          101010000000100000001000000010000000100000BD000000BD000000BD0000
          00BD0000FF9C0000FF9C0000FF9C0000FF9C00009C6300009C6300009C630000
          636300006363000063630000313100003131000031310000DE000000DE000000
          DE000000DE0000008C0000008C0000008C000000210000002100000021000000
          1000000010000000100000001000000000000000000000000000000000000000
          00000000FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFB
          FBFBFBFBFB003030303030303030303030304F4F4F4F4F303030303030303030
          303030FBFB00303030303030303030303030FBFBFBFB4F303030303030303030
          303030FBFB00303000000000000000000000003030FB4F000000000000000000
          303030FBFB0030A14F4F4F4F4F4F4F4F4F4F003030FB7F4F4F4F4F4F4F4F4F4F
          003030FBFB0030A17F7F7F7F7F7F7F7F7F7F003030FBFB7F7F7F7F7F7F7F7F7F
          303030FBFB00303030303030303030303030000000FB30303030303030303030
          303030FBFB000000000000000000000000000000000000000000000000000000
          000000FBFB7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
          7F7F7FFBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030C4C43030303030C430303030C4C430303030
          303030FBFB00307BBEBEFB3030C430C4C430303030C4C43030C430C4C4303030
          303030FBFB0030303030303030C4C430C43030303030C43030C4C430C4303030
          303030FBFB00307BBEBEBEFB3030C430C4C430303030C4C43030C430C4C43030
          303030FBFB003030303030303030C4C430C43030303030C43030C4C430C43030
          303030FBFB00307B7BA4BEBEFB3030C430C4C430C4C4C4C4C4C430C430C4C430
          303030FBFB00303030303030303030C4C430C43030C43030C43030C4C430C430
          303030FBFB00307B7B7BA4BEBEFB3030C430C4C43030C430C4C43030C430C4C4
          303030FBFB0030303030303030303030C4C430C4303030C430C43030C4C430C4
          303030FBFB00307B7B7B7BA4BEBEFB3030C430C4C4303030C430C43030C430C4
          C43030FBFB003030303030303030303030C4C430C430303030C4C43030C4C430
          C43030FBFB00307B7B7B7B7BA4BEBEFB3030C4C4303030303030C4C43030C4C4
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB003030303030303030303030303030303030303030303030303030
          303030FBFB000000000000000000000000000000000000000000000000000000
          000000FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFB
          FBFBFBFB00000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          00000000}
        Transparent = True
      end
      object labTQueue: TLabel
        Left = 64
        Top = 17
        Width = 30
        Height = 12
        Caption = 'Queue'
      end
      object lstQueue: TListView
        Left = 8
        Top = 48
        Width = 513
        Height = 241
        Checkboxes = True
        Columns = <
          item
            Caption = 'Port'
            Width = 60
          end
          item
            Caption = 'Stamp'
            Width = 120
          end
          item
            Caption = 'Retry'
          end
          item
            Caption = 'State'
          end
          item
            Caption = 'Data'
            Width = 200
          end>
        GridLines = True
        HideSelection = False
        MultiSelect = True
        ReadOnly = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = False
        SmallImages = ImageList1
        TabOrder = 0
        ViewStyle = vsReport
        OnColumnClick = lstPortColumnClick
        OnCompare = lstPortCompare
      end
      object btQDel: TButton
        Left = 350
        Top = 301
        Width = 75
        Height = 21
        Caption = 'Del'
        TabOrder = 2
        OnClick = btQDelClick
      end
      object btQRefresh: TButton
        Left = 430
        Top = 301
        Width = 75
        Height = 21
        Caption = 'Refresh'
        TabOrder = 3
        OnClick = btQRefreshClick
      end
      object btqDelAll: TButton
        Left = 270
        Top = 301
        Width = 75
        Height = 21
        Caption = 'DelAll'
        TabOrder = 1
        OnClick = btQDelClick
      end
    end
    object TabLog: TTabSheet
      Caption = 'Log'
      ImageIndex = 4
      OnShow = TabLogShow
      object Image7: TImage
        Left = 16
        Top = 9
        Width = 32
        Height = 32
        AutoSize = True
        Picture.Data = {
          055449636F6E0000010001002020000000000000A80800001600000028000000
          2000000040000000010008000000000080040000000000000000000000000000
          00000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00CEFFFF00CEFFFF00
          CEFFFF00CEFFFF009CFFFF009CFFFF009CFFFF0063FFFF0063FFFF0063FFFF00
          31FFFF0031FFFF0031FFFF0000FFFF0000FFFF0000FFFF0000FFFF009CCEFF00
          9CCEFF009CCEFF0063CEFF0063CEFF0063CEFF00639CFF00639CFF00639CFF00
          3163FF003163FF003163FF000063FF000063FF000063FF003131FF003131FF00
          3131FF000031FF000031FF000031FF000031FF00EFEFEF00EFEFEF00EFEFEF00