mainform.dfm

DarkMoon v4.11 (远程控制) 国外收集的代码,控件下载: http://www.winio.cn/Blogs/jishuwenzhang/200712/20071208230135.

        Top = 32
        Width = 121
        Height = 25
        OnClick = btnMainAdmin46Click
        Caption = 'Download URL File'
        TabOrder = 9
      end
      object btnMainAdmin10: TTeButton
        Left = 152
        Top = 56
        Width = 121
        Height = 25
        OnClick = btnMainAdmin10Click
        Caption = 'Disable Start Button'
        TabOrder = 10
      end
      object btnMainAdmin21: TTeButton
        Left = 152
        Top = 80
        Width = 121
        Height = 25
        Alignment = taLeftJustify
        Caption = 'Active Screensaver'
        TabOrder = 11
      end
      object btnMainAdmin9: TTeButton
        Left = 152
        Top = 104
        Width = 121
        Height = 25
        OnClick = btnMainAdmin9Click
        Caption = 'Actived Window'
        TabOrder = 12
      end
      object btnMainAdmin17: TTeButton
        Left = 152
        Top = 128
        Width = 121
        Height = 25
        OnClick = btnMainAdmin17Click
        Caption = 'Play Sound'
        TabOrder = 13
      end
      object btnMainAdmin23: TTeButton
        Left = 152
        Top = 152
        Width = 121
        Height = 25
        OnClick = btnMainAdmin23Click
        Caption = 'Scroll Start Menu'
        TabOrder = 14
      end
      object btnAdminResetServer: TTeButton
        Left = 152
        Top = 176
        Width = 121
        Height = 33
        OnClick = btnAdminResetServerClick
        Caption = 'Reset Server'
        TabOrder = 15
      end
    end
  end
  object gbFun: TTeGroupBox
    Left = 808
    Top = 184
    Width = 345
    Height = 217
    Visible = False
    CaptionMargin = 12
    Caption = 'Fun'
    CheckBoxAlignment = kalLeftJustify
    ThemeObject = 'default'
    Transparent = True
    TabOrder = 23
    UseCheckBox = False
    object btnMainFun0: TTeButton
      Left = 8
      Top = 17
      Width = 89
      Height = 32
      OnClick = btnMainFun0Click
      Caption = 'Open CD-Rom'
      TabOrder = 0
    end
    object btnMainFun24: TTeButton
      Left = 8
      Top = 49
      Width = 89
      Height = 32
      OnClick = btnMainFun24Click
      Caption = 'Noisy'
      TabOrder = 1
    end
    object btnMainFun14: TTeButton
      Left = 8
      Top = 80
      Width = 89
      Height = 33
      OnClick = btnMainFun14Click
      Caption = 'Change Click'
      TabOrder = 2
    end
    object btnMainFun13: TTeButton
      Left = 8
      Top = 112
      Width = 89
      Height = 33
      OnClick = btnMainFun13Click
      Caption = 'Show Icons'
      TabOrder = 3
    end
    object btnMainFun19: TTeButton
      Left = 8
      Top = 144
      Width = 89
      Height = 33
      OnClick = btnMainFun19Click
      Caption = 'Crazy Mouse'
      TabOrder = 4
    end
    object btnMainFun16: TTeButton
      Left = 8
      Top = 177
      Width = 89
      Height = 32
      OnClick = btnMainFun16Click
      Caption = 'Freese Mouse'
      TabOrder = 5
    end
    object btnMainFun11: TTeButton
      Left = 152
      Top = 177
      Width = 129
      Height = 32
      OnClick = btnMainFun11Click
      Caption = 'Show TaskBar'
      TabOrder = 6
    end
    object btnMainFun6: TTeButton
      Left = 152
      Top = 145
      Width = 129
      Height = 32
      OnClick = btnMainFun6Click
      Caption = 'Shut Down'
      TabOrder = 7
    end
    object btnMainFun18: TTeButton
      Left = 152
      Top = 16
      Width = 129
      Height = 33
      OnClick = btnMainFun18Click
      Caption = 'Min Actived Window'
      TabOrder = 8
    end
    object btnMainFun20: TTeButton
      Left = 152
      Top = 48
      Width = 129
      Height = 33
      OnClick = btnMainFun20Click
      Caption = 'Crazy Start Botton'
      TabOrder = 9
    end
    object btnMainFun12: TTeButton
      Left = 152
      Top = 81
      Width = 129
      Height = 32
      OnClick = btnMainFun12Click
      Caption = 'Show Systray Bar'
      TabOrder = 10
    end
    object btnMainFun28: TTeButton
      Left = 152
      Top = 112
      Width = 129
      Height = 33
      OnClick = btnMainFun28Click
      Caption = 'Snake'
      TabOrder = 11
    end
  end
  object gbSpyKeylogger: TTeGroupBox
    Left = 508
    Top = 112
    Width = 353
    Height = 257
    Visible = False
    CaptionMargin = 12
    Caption = 'Keylogger'
    CheckBoxAlignment = kalLeftJustify
    ThemeObject = 'default'
    Transparent = True
    TabOrder = 15
    UseCheckBox = False
    object gbKeyloggerSendKeys: TTeGroupBox
      Left = 8
      Top = 24
      Width = 337
      Height = 49
      CaptionMargin = 12
      Caption = 'Send keys'
      CheckBoxAlignment = kalLeftJustify
      ThemeObject = 'default'
      Transparent = True
      TabOrder = 0
      UseCheckBox = False
      DesignSize = (
        325
        41)
      object Memo2: TTeMemo
        Left = 8
        Top = 16
        Width = 321
        Height = 25
        Color = clGray
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 14327653
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        WantReturns = False
        OnChange = memoMainChange
        OnKeyDown = Memo2KeyDown
        ThemeObject = 'default'
      end
    end
    object gbKeyloggerGetkeys: TTeGroupBox
      Left = 8
      Top = 72
      Width = 337
      Height = 161
      CaptionMargin = 12
      Caption = 'Get Keys'
      CheckBoxAlignment = kalLeftJustify
      ThemeObject = 'default'
      Transparent = True
      TabOrder = 1
      UseCheckBox = False
      DesignSize = (
        325
        153)
      object memoGetkeys: TTeMemo
        Left = 12
        Top = 13
        Width = 313
        Height = 140
        Align = alClient
        Color = clGray
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 0
        WantReturns = False
        OnChange = memoGetkeysChange
        OnDblClick = memoGetkeysDblClick
        ThemeObject = 'default'
      end
    end
    object btnKeyloggerSave: TTeButton
      Left = 136
      Top = 232
      Width = 57
      Height = 17
      OnClick = btnKeyloggerSaveClick
      Caption = 'Save'
      TabOrder = 2
    end
  end
  object gbWindows: TTeGroupBox
    Left = 580
    Top = 160
    Width = 325
    Height = 241
    Visible = False
    CaptionMargin = 12
    Caption = 'Windows'
    CheckBoxAlignment = kalLeftJustify
    ThemeObject = 'default'
    Transparent = True
    TabOrder = 17
    UseCheckBox = False
    DesignSize = (
      313
      233)
    object lv3: TTeListView
      Left = 88
      Top = 24
      Width = 225
      Height = 201
      Color = clWhite
      Columns = <
        item
          Caption = 'Name'
          Width = 160
        end>
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      ViewStyle = vsReport
      ThemeObject = 'default'
    end
    object TeGroupBox11: TTeGroupBox
      Left = 8
      Top = 24
      Width = 73
      Height = 201
      CaptionMargin = 12
      CheckBoxAlignment = kalLeftJustify
      ThemeObject = 'default'
      Transparent = True
      TabOrder = 3
      UseCheckBox = False
      object btnSpyWindowsClose: TTeButton
        Left = 8
        Top = 8
        Width = 57
        Height = 33
        OnClick = btnSpyWindowsCloseClick
        Caption = 'Close'