sendcommand.dfm

这是一个正式的项目工程

            07057F757F5555757F7F0F0B0FBB3B0B08057F757FF55575757F0F7F00FFB00F
            780575F757FFF757F5755080F00000F0805557F75577755757F550F80FBFBF08
            8055575F775557755755550F8700078805555575FF77755F755555500FFF8800
            5555555775FFFF77555555555000005555555555577777555555}
          NumGlyphs = 2
        end
        object BitBtnGravity: TBitBtn
          Left = 10
          Top = 5
          Width = 80
          Height = 25
          Action = ActionSetup
          Caption = '标准重力'
          Font.Charset = GB2312_CHARSET
          Font.Color = clHighlight
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337333733373
            3373337F3F7F3F7F3F7F33737373737373733F7F7F7F7F7F7F7F770000000000
            00007777777777777777330333333C333333337FFF3337F3333F370993333C33
            3399377773F337F33377330339333C3339333F7FF7FFF7FFF7FF770777977C77
            97777777777777777777330333933C339333337F3373F7F37333370333393C39
            3333377F333737F7333333033333999333333F7FFFFF777FFFFF770777777C77
            77777777777777777777330333333C330333337F333337FF7FF3370333333C00
            003C377F333337777737330333333C3303333F7FFFFFF7FF7FFF770777777777
            7777777777777777777733333333333333333333333333333333}
          NumGlyphs = 2
        end
        object BitBtnDownLoad: TBitBtn
          Left = 282
          Top = 5
          Width = 75
          Height = 25
          Action = ActionDownLoad
          Caption = '卸荷'
          Font.Charset = GB2312_CHARSET
          Font.Color = clHighlight
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333
            3330337F3F7F33333F3787070003333707303F737773333373F7007703333330
            700077337F3333373777887007333337007733F773F333337733700070333333
            077037773733333F7F37703707333300080737F373333377737F003333333307
            78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733
            078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730
            70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003
            3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003
            33337F73FF737773333307800077033333337337773373333333}
          NumGlyphs = 2
        end
        object BitBtnComPort: TBitBtn
          Left = 101
          Top = 5
          Width = 75
          Height = 25
          Action = ActionStop
          Caption = '停止'
          Font.Charset = GB2312_CHARSET
          Font.Color = clHighlight
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            5555555555FFFFF5555555555000005555555555F777775FF555555008877700
            55555557755FFF775F55550887000777055555755F777FFF75F5508800000007
            705557F57777777FF7F55080000000007055575777777777F75F087000333000
            77057F5777555777FF7F08000333330007057F777F5555777F7F0F0003333300
            07057F777F5555777F7F0F000833330008057F777FF55577757F0F7000883000
            780575F777FFF777F575508000000000805557F77777777757F550F800000008
            8055575F777777755755550F8700078805555575FF77755F755555500FFF8800
            5555555775FFFF77555555555000005555555555577777555555}
          NumGlyphs = 2
        end
      end
      object PanelMedium: TPanel
        Left = 1
        Top = 1
        Width = 37
        Height = 330
        Align = alLeft
        BevelInner = bvLowered
        BevelOuter = bvLowered
        TabOrder = 1
        object BitBtnRight: TBitBtn
          Left = 4
          Top = 69
          Width = 30
          Height = 30
          Action = ActionRight
          TabOrder = 0
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            33333FF3333333333333447333333333333377FFF33333333333744473333333
            333337773FF3333333333444447333333333373F773FF3333333334444447333
            33333373F3773FF3333333744444447333333337F333773FF333333444444444
            733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
            999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
            33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
            333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
            33333777333333333333CC333333333333337733333333333333}
          NumGlyphs = 2
        end
        object BitBtn2: TBitBtn
          Left = 2
          Top = 263
          Width = 33
          Height = 30
          Action = ActionClearAll
          Caption = '全清'
          Font.Charset = GB2312_CHARSET
          Font.Color = clHighlight
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          NumGlyphs = 2
        end
        object BitBtn3: TBitBtn
          Left = 2
          Top = 221
          Width = 33
          Height = 30
          Action = ActionClearSelect
          Caption = '清除'
          Font.Charset = GB2312_CHARSET
          Font.Color = clHighlight
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          NumGlyphs = 2
        end
      end
      object Panel7: TPanel
        Left = 38
        Top = 1
        Width = 120
        Height = 330
        Align = alLeft
        BevelOuter = bvNone
        Caption = 'Panel7'
        TabOrder = 2
        object Panel8: TPanel
          Left = 0
          Top = 0
          Width = 120
          Height = 46
          Align = alTop
          BevelOuter = bvLowered
          TabOrder = 0
          object RadioGroupSelect: TRadioGroup
            Left = 1
            Top = 1
            Width = 118
            Height = 44
            Align = alClient
            Caption = '待接受命令的分机'
            Columns = 2
            Font.Charset = GB2312_CHARSET
            Font.Color = clHighlight
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            Items.Strings = (
              '全部'
              '所选')
            ParentFont = False
            TabOrder = 0
          end
        end
        object ListBoxSelect: TListBox
          Left = 0
          Top = 46
          Width = 120
          Height = 284
          Align = alClient
          Color = clInfoBk
          ItemHeight = 14
          Items.Strings = (
            '[1]'
            '[2]'
            '[3]'
            '[4]')
          MultiSelect = True
          TabOrder = 1
        end
      end
      object Panel9: TPanel
        Left = 161
        Top = 1
        Width = 211
        Height = 330
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 3
        object Splitter3: TSplitter
          Left = 0
          Top = 170
          Width = 211
          Height = 3
          Cursor = crVSplit
          Align = alTop
        end
        object Panel11: TPanel
          Left = 0
          Top = 0
          Width = 211
          Height = 170
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 0
          object LabelHeight: TLabel
            Left = 6
            Top = 103
            Width = 72
            Height = 12
            Caption = '本次升降高度'
            Font.Charset = GB2312_CHARSET
            Font.Color = clHighlight
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label11: TLabel
            Left = 166
            Top = 101
            Width = 24
            Height = 12
            Caption = '厘米'
            Font.Charset = GB2312_CHARSET
            Font.Color = clHighlight
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object RadioGroupOperation: TRadioGroup
            Left = 0
            Top = 0
            Width = 211
            Height = 95
            Align = alTop
            Caption = '即将进行的项目选择'
            Columns = 2
            Font.Charset = GB2312_CHARSET
            Font.Color = clHighlight
            Font.Height = -12
            Font.Name = '宋体'