远程控制编程

开发平台：
Delphi

untClient.dfm：源码内容
							object Form1: TForm1
  Left = 190
  Top = 105
  Width = 520
  Height = 269
  Caption = 'miniRAT'
  Color = clBtnFace
  Constraints.MinHeight = 269
  Constraints.MinWidth = 392
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  DesignSize = (
    512
    242)
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 512
    Height = 49
    Anchors = [akLeft, akTop, akRight]
    Caption = 'Connection Settings'
    TabOrder = 0
    DesignSize = (
      512
      49)
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 73
      Height = 21
      AutoSize = False
      Caption = 'Port to listen :'
      Layout = tlCenter
    end
    object Label2: TLabel
      Left = 152
      Top = 16
      Width = 57
      Height = 21
      AutoSize = False
      Caption = 'Password :'
      Layout = tlCenter
    end
    object Edit1: TEdit
      Left = 80
      Top = 16
      Width = 65
      Height = 21
      TabOrder = 0
      Text = '80'
    end
    object Button1: TButton
      Left = 440
      Top = 16
      Width = 65
      Height = 21
      Anchors = [akTop, akRight]
      Caption = '&Listen'
      TabOrder = 1
      OnClick = Button1Click
    end
    object Edit2: TEdit
      Left = 216
      Top = 16
      Width = 217
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      PasswordChar = '*'
      TabOrder = 2
      Text = 'shj'
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 225
    Width = 512
    Height = 17
    Panels = <
      item
        Width = 100
      end
      item
        Width = 50
      end>
  end
  object ListView1: TListView
    Left = 0
    Top = 64
    Width = 512
    Height = 161
    Anchors = [akLeft, akTop, akRight, akBottom]
    Columns = <
      item
        Caption = 'Address'
        Width = 100
      end
      item
        Caption = 'Port'
      end
      item
        Caption = 'Version'
      end
      item
        Caption = 'Connection'
        Width = 70
      end
      item
        Caption = 'KBs In/Out'
        Width = 90
      end
      item
        Caption = 'Socket'
      end
      item
        Caption = 'Name'
        Width = 80
      end>
    ColumnClick = False
    GridLines = True
    ReadOnly = True
    RowSelect = True
    PopupMenu = PopupMenu1
    TabOrder = 2
    ViewStyle = vsReport
  end
  object PopupMenu1: TPopupMenu
    Left = 8
    Top = 72
    object N3: TMenuItem
      Caption = #22686#21152#20027#26426
      OnClick = N3Click
    end
    object ransferView1: TMenuItem
      Caption = '&Transfer View'
      OnClick = ransferView1Click
    end
    object InformationView1: TMenuItem
      Caption = '&Information View'
      OnClick = InformationView1Click
    end
    object FileManager1: TMenuItem
      Caption = '&File Manager'
      OnClick = FileManager1Click
    end
    object ProcessList1: TMenuItem
      Caption = '&Process List'
      OnClick = ProcessList1Click
    end
    object RemoteCmd1: TMenuItem
      Caption = '&Remote Cmd'
      OnClick = RemoteCmd1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Disconnect1: TMenuItem
      Caption = '&Disconnect'
      OnClick = Disconnect1Click
    end
    object Uninstall1: TMenuItem
      Caption = '&Uninstall'
      OnClick = Uninstall1Click
    end
    object Download1: TMenuItem
      Caption = 'UR&L Download'
      object hisone1: TMenuItem
        Caption = 'This one'
        OnClick = hisone1Click
      end
      object Everyone1: TMenuItem
        Caption = '&Everyone'
        OnClick = Everyone1Click
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object CreateServer1: TMenuItem
      Caption = '&Create Server'
      OnClick = CreateServer1Click
    end
    object About1: TMenuItem
      Caption = '&About'
      OnClick = About1Click
    end
  end
  object Timer1: TTimer
    Interval = 1
    OnTimer = Timer1Timer
    Left = 40
    Top = 72
  end
end

						