code.dfm

这个也不错

        end
        object label9: TLabel
          Left = 131
          Top = 64
          Width = 37
          Height = 16
          Caption = 'label9'
          Visible = False
        end
        object Edit6: TEdit
          Left = 104
          Top = 31
          Width = 217
          Height = 24
          TabOrder = 0
          Text = 'c:\temp.exe'
        end
        object BitBtn47: TBitBtn
          Left = 335
          Top = 51
          Width = 82
          Height = 26
          Caption = '开始上载'
          TabOrder = 1
          OnClick = BitBtn47Click
          Kind = bkIgnore
        end
        object BitBtn48: TBitBtn
          Left = 334
          Top = 15
          Width = 83
          Height = 26
          Caption = '选择文件'
          TabOrder = 2
          OnClick = BitBtn48Click
          Kind = bkIgnore
        end
      end
      object GroupBox11: TGroupBox
        Left = 191
        Top = 121
        Width = 413
        Height = 128
        Align = alClient
        Caption = '远程命令'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 12
        object Label10: TLabel
          Left = 97
          Top = 29
          Width = 78
          Height = 16
          Caption = '远程文件路径'
        end
        object Label11: TLabel
          Left = 102
          Top = 69
          Width = 78
          Height = 16
          Caption = '远程文件路径'
        end
        object BitBtn49: TBitBtn
          Left = 12
          Top = 24
          Width = 81
          Height = 25
          Caption = '删除文件'
          TabOrder = 0
          OnClick = BitBtn49Click
          Kind = bkIgnore
        end
        object Edit7: TEdit
          Left = 192
          Top = 24
          Width = 225
          Height = 24
          TabOrder = 1
        end
        object BitBtn50: TBitBtn
          Left = 14
          Top = 62
          Width = 78
          Height = 25
          Caption = '远程执行'
          TabOrder = 2
          OnClick = BitBtn50Click
          Kind = bkIgnore
        end
        object Edit8: TEdit
          Left = 192
          Top = 62
          Width = 225
          Height = 24
          TabOrder = 3
          Text = 'c:\windows\explorer.exe'
        end
      end
      object GroupBox12: TGroupBox
        Left = 191
        Top = 121
        Width = 413
        Height = 128
        Align = alClient
        Caption = '下载文件'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 13
        object Label12: TLabel
          Left = 14
          Top = 24
          Width = 143
          Height = 16
          Caption = '请输入远程文件完整路径'
        end
        object Label13: TLabel
          Left = 16
          Top = 62
          Width = 130
          Height = 16
          Caption = '请选择你要保存的目录'
        end
        object SpeedButton1: TSpeedButton
          Left = 152
          Top = 56
          Width = 49
          Height = 25
          Caption = '浏览'
          OnClick = SpeedButton1Click
        end
        object Edit9: TEdit
          Left = 160
          Top = 16
          Width = 257
          Height = 24
          TabOrder = 0
          Text = 'c:\windows\explorer.exe'
        end
        object Edit10: TEdit
          Left = 208
          Top = 56
          Width = 113
          Height = 24
          TabOrder = 1
          Text = 'c:\temp.zip'
        end
        object BitBtn52: TBitBtn
          Left = 335
          Top = 51
          Width = 83
          Height = 30
          Caption = '开始下载'
          TabOrder = 2
          OnClick = BitBtn52Click
          Kind = bkIgnore
        end
      end
      object GroupBox13: TGroupBox
        Left = 191
        Top = 121
        Width = 413
        Height = 128
        Align = alClient
        Caption = '格式化 '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        object Label14: TLabel
          Left = 24
          Top = 24
          Width = 78
          Height = 16
          Caption = '终结式格式化'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label15: TLabel
          Left = 24
          Top = 64
          Width = 78
          Height = 16
          Caption = '删除式格式化'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object SpeedButton2: TSpeedButton
          Left = 336
          Top = 77
          Width = 74
          Height = 25
          Caption = '弹出开始'
          OnClick = SpeedButton2Click
        end
        object BitBtn51: TBitBtn
          Left = 334
          Top = 13
          Width = 76
          Height = 25
          Caption = '开始'
          TabOrder = 0
          OnClick = BitBtn51Click
          Kind = bkIgnore
        end
        object Edit11: TEdit
          Left = 144
          Top = 16
          Width = 161
          Height = 24
          TabOrder = 1
          Text = 'C:\'
        end
        object Edit12: TEdit
          Left = 144
          Top = 56
          Width = 161
          Height = 24
          TabOrder = 2
          Text = 'C:\'
        end
        object BitBtn53: TBitBtn
          Left = 336
          Top = 48
          Width = 73
          Height = 24
          Caption = '开始'
          TabOrder = 3
          OnClick = BitBtn53Click
          Kind = bkIgnore
        end
      end
      object ListBox2: TListBox
        Left = 136
        Top = 183
        Width = 21
        Height = 17
        ItemHeight = 13
        TabOrder = 15
      end
    end
  end
  object MainMenu1: TMainMenu
    Images = ImageList2
    Left = 192
    Top = 80
    object N1: TMenuItem
      Caption = '连接'
      object N2: TMenuItem
        Caption = '连接主机'
        ImageIndex = 3
      end
      object N3: TMenuItem
        Caption = '断开主机'
        ImageIndex = 3
      end
      object N4: TMenuItem
        Caption = '自动扫描'
        ImageIndex = 1
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object N6: TMenuItem
        Caption = '注视'
        ImageIndex = 2
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object N8: TMenuItem
        Caption = '退出'
        ImageIndex = 2
        OnClick = N8Click
      end
    end
    object N9: TMenuItem
      Caption = '设置'
      ImageIndex = 0
      object N10: TMenuItem
        Caption = '锁定'
        ImageIndex = 2
      end
      object N11: TMenuItem
        Caption = '打开'
        ImageIndex = 2
      end
      object N12: TMenuItem
        Caption = '-'
      end
    end
    object N13: TMenuItem
      Caption = '关于'
      ImageIndex = 2
      object N14: TMenuItem
        Caption = '关于我'
        ImageIndex = 2
        OnClick = N14Click
      end
      object N15: TMenuItem
        Caption = '写信给我'
        ImageIndex = 2
        OnClick = N15Click
      end
      object Email1: TMenuItem
        Caption = '访问我的网站'
        ImageIndex = 2
        OnClick = Email1Click
      end
      object N16: TMenuItem
        Caption = '-'
      end
      object N19: TMenuItem
        Caption = '技术支持'
      end
    end
  end
  object ImageList1: TImageList
    Height = 32
    Masked = False
    Width = 32
    Left = 352
    Top = 80
    Bitmap = {
      494C010105000900040020002000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000800000006000000001001000000000000060
      000000000000000000000000000000000000F75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E
      F75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75EF75E