memorybrowserformunit.dfm.svn-base

这是一段游戏修改工具的源代码.ring3功能由dephi开发,驱动是C开发.希望对大家有帮助

          Top = 13
          Width = 28
          Height = 2
          Brush.Color = clBlack
        end
        object Label16: TLabel
          Left = 6
          Top = 161
          Width = 89
          Height = 13
          Caption = 'Segment Registers'
        end
        object Shape3: TShape
          Left = 6
          Top = 174
          Width = 90
          Height = 2
          Brush.Color = clBlack
        end
        object dflabel: TLabel
          Tag = 25
          Left = 136
          Top = 96
          Width = 32
          Height = 13
          Caption = 'DF 0'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier'
          Font.Style = []
          ParentFont = False
          OnDblClick = EAXLabelDblClick
        end
      end
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 294
    Width = 666
    Height = 217
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 1
    TabOrder = 1
    OnEnter = Panel4Enter
    OnMouseDown = Panel4MouseDown
    OnResize = Panel4Resize
    DesignSize = (
      666
      217)
    object MBCanvas: TPaintBox
      Left = 1
      Top = 9
      Width = 644
      Height = 207
      Anchors = [akLeft, akTop, akRight, akBottom]
      PopupMenu = memorypopup
      OnDblClick = MBCanvasDblClick
      OnMouseDown = MBCanvasMouseDown
      OnMouseMove = MBCanvasMouseMove
      OnMouseUp = MBCanvasMouseUp
      OnPaint = MBCanvasPaint
    end
    object Protectlabel: TLabel
      Tag = 2
      Left = 3
      Top = 2
      Width = 48
      Height = 13
      Caption = 'Protection'
    end
    object ScrollBar2: TScrollBar
      Left = 649
      Top = 1
      Width = 16
      Height = 215
      Align = alRight
      Kind = sbVertical
      Max = 101
      PageSize = 2
      Position = 50
      TabOrder = 0
      OnScroll = ScrollBar2Scroll
    end
    object HexEdit: TEdit
      Left = 104
      Top = 32
      Width = 18
      Height = 14
      BevelOuter = bvNone
      BorderStyle = bsNone
      Color = clHighlight
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clHighlightText
      Font.Height = -11
      Font.Name = 'Courier'
      Font.Style = []
      MaxLength = 2
      ParentCtl3D = False
      ParentFont = False
      PopupMenu = memorypopup
      TabOrder = 1
      Text = 'EE'
      Visible = False
      OnDblClick = HexEditDblClick
      OnExit = HexEditExit
      OnKeyDown = HexEditKeyDown
      OnKeyPress = HexEditKeyPress
    end
    object TextEdit: TEdit
      Left = 552
      Top = 48
      Width = 10
      Height = 14
      BevelOuter = bvNone
      BorderStyle = bsNone
      Color = clHighlight
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clHighlightText
      Font.Height = -11
      Font.Name = 'Courier'
      Font.Style = []
      MaxLength = 1
      ParentCtl3D = False
      ParentFont = False
      PopupMenu = memorypopup
      TabOrder = 2
      Text = 'E'
      Visible = False
      OnExit = TextEditExit
      OnKeyDown = TextEditKeyDown
      OnKeyPress = TextEditKeyPress
    end
  end
  object memorypopup: TPopupMenu
    OnPopup = memorypopupPopup
    Left = 8
    Top = 480
    object Change1: TMenuItem
      Caption = 'Edit'
      OnClick = Change1Click
    end
    object Goto1: TMenuItem
      Caption = 'Goto address'
      OnClick = Goto1Click
    end
    object Search1: TMenuItem
      Caption = 'Search memory...'
      ShortCut = 16454
      OnClick = Search1Click
    end
    object N13: TMenuItem
      Caption = '-'
    end
    object Cut1: TMenuItem
      Caption = 'Copy to clipboard'
      ShortCut = 16451
      OnClick = Cut1Click
    end
    object Pastefromclipboard1: TMenuItem
      Caption = 'Paste from clipboard'
      ShortCut = 16464
      OnClick = Pastefromclipboard1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Addthisaddresstothelist1: TMenuItem
      Caption = 'Add this address to the list'
      OnClick = Addthisaddresstothelist1Click
    end
    object Makepagewritable1: TMenuItem
      Caption = 'Make page writable'
      OnClick = Makepagewritable1Click
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 5000
    Left = 40
    Top = 288
  end
  object debuggerpopup: TPopupMenu
    OnPopup = debuggerpopupPopup
    Top = 240
    object Gotoaddress1: TMenuItem
      Caption = 'Go to address'
      OnClick = Gotoaddress1Click
    end
    object Back1: TMenuItem
      Caption = 'Back'
      OnClick = Back1Click
    end
    object Follow1: TMenuItem
      Caption = 'Follow'
      Visible = False
      OnClick = Follow1Click
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Replacewithnops1: TMenuItem
      Caption = 'Replace with code that does nothing'
      OnClick = Replacewithnops1Click
    end
    object Addthisopcodetothecodelist1: TMenuItem
      Caption = 'Add to the code list'
      OnClick = Addthisopcodetothecodelist1Click
    end
    object Assemble1: TMenuItem
      Caption = 'Assemble'
      OnClick = Assemble1Click
    end
    object Copytoclipboard1: TMenuItem
      Caption = 'Copy to clipboard'
      object CopyBytesAndOpcodes: TMenuItem
        Caption = 'Bytes+Opcodes'
        OnClick = CopyBytesAndOpcodesClick
      end
      object copyBytes: TMenuItem
        Caption = 'Bytes'
        OnClick = CopyBytesAndOpcodesClick
      end
      object copyOpcodes: TMenuItem
        Caption = 'Opcodes'
        OnClick = CopyBytesAndOpcodesClick
      end
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object Changestateofregisteratthislocation1: TMenuItem
      Caption = 'Change register at this location'
      OnClick = Changestateofregisteratthislocation1Click
    end
    object ogglebreakpoint1: TMenuItem
      Caption = 'Toggle breakpoint'
      OnClick = ogglebreakpoint1Click
    end
    object Breakandtraceinstructions1: TMenuItem
      Caption = 'Break and trace instructions'
      OnClick = Breakandtraceinstructions1Click
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object Createjumptocodecave1: TMenuItem
      Caption = 'Create jump and initialize Code-Cave'
      OnClick = Createjumptocodecave1Click
    end
  end
  object Timer2: TTimer
    Interval = 500
    OnTimer = Timer2Timer
    Left = 928
    Top = 352
  end
  object MainMenu1: TMainMenu
    object File1: TMenuItem
      Caption = 'File'
      object Newwindow1: TMenuItem
        Caption = 'New window'
        OnClick = Newwindow1Click
      end
      object Loadsymbolfile1: TMenuItem
        Caption = 'Load symbol file'
        Visible = False
      end
      object Savedisassemledoutput1: TMenuItem
        Caption = 'Save disassembled output'
        OnClick = Savedisassemledoutput1Click
      end
      object N14: TMenuItem
        Caption = '-'
      end
      object Setsymbolsearchpath1: TMenuItem
        Caption = 'Set symbol searchpath'
        OnClick = Setsymbolsearchpath1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Savememoryregion1: TMenuItem
        Caption = 'Save memory region'
        ShortCut = 16467
        OnClick = Savememoryregion1Click
      end
      object Loadmemolryregion1: TMenuItem
        Caption = 'Load memory region'
        ShortCut = 16463
        OnClick = Loadmemolryregion1Click
      end
    end
    object Search2: TMenuItem
      Caption = 'Search'
      object Findmemory1: TMenuItem
        Caption = 'Find memory'
        OnClick = Findmemory1Click
      end
      object Assemblycode1: TMenuItem
        Caption = 'Find assembly code'
        OnClick = Assemblycode1Click
      end
    end
    object View1: TMenuItem
      Caption = 'View'
      object Stacktrace1: TMenuItem
        Caption = 'Stacktrace'
        Enabled = False
        OnClick = Stacktrace1Click
      end
      object Breakpointlist1: TMenuItem
        Caption = 'Breakpointlist'
        ShortCut = 16450
        OnClick = Breakpointlist1Click
      end
      object Threadlist1: TMenuItem
        Caption = 'Threadlist'
        OnClick = Threadlist1Click
      end
      object Debugstrings1: TMenuItem
        Caption = 'Debug strings'
        ShortCut = 49220
        OnClick = Debugstrings1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object MemoryRegions1: TMenuItem
        Caption = 'Memory Regions'
        ShortCut = 16466
        OnClick = MemoryRegions1Click
      end
      object Heaps1: TMenuItem
        Caption = 'Heaplist'
        ShortCut = 16456
        OnClick = Heaps1Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object EnumeratedllsandSymbols1: TMenuItem
        Caption = 'Enumerate DLL'#39's and Symbols'
        ShortCut = 49235
        OnClick = EnumeratedllsandSymbols1Click
      end
      object N10: TMenuItem
        Caption = '-'
      end
      object Showsymbols1: TMenuItem
        Caption = 'Show symbols'
        Checked = True
        OnClick = Showsymbols1Click
      end
      object Kernelmodesymbols1: TMenuItem
        Caption = 'Kernelmode symbols'
        OnClick = Kernelmodesymbols1Click
      end
      object Showmoduleaddresses1: TMenuItem
        Caption = 'Show module addresses'
        ShortCut = 16461
        OnClick = Showmoduleaddresses1Click
      end
      object Symbolhandler1: TMenuItem
        Caption = 'Userdefined symbols'
        ShortCut = 16469
        OnClick = Symbolhandler1Click
      end
      object Showvaluesofstaticaddresses1: TMenuItem
        Caption = 'Show '#39'special'#39' row'
        ShortCut = 16470
        OnClick = Showvaluesofstaticaddresses1Click
      end
    end
    object Debug1: TMenuItem
      Caption = 'Debug'
      object Run1: TMenuItem
        Caption = 'Run'
        Enabled = False
        ShortCut = 120
        OnClick = Run1Click
      end
      object Step1: TMenuItem
        Caption = 'Step'
        Enabled = False
        ShortCut = 118
        OnClick = Step1Click
      end
      object StepOver1: TMenuItem
        Caption = 'Step Over'
        Enabled = False
        ShortCut = 119
        OnClick = StepOver1Click
      end
      object Runtill1: TMenuItem
        Caption = 'Run till...'
        Enabled = False
        ShortCut = 115
        OnClick = Runtill1Click
      end
      object Setbreakpoint1: TMenuItem
        Caption = 'Toggle breakpoint'
        ShortCut = 116
        OnClick = Setbreakpoint1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Break1: TMenuItem
        Caption = 'Break'
        OnClick = Break1Click
      end
    end
    object Extra1: TMenuItem
      Caption = 'Tools'
      object Reservememory1: TMenuItem
        Caption = 'Allocate Memory'
        ShortCut = 49229
        OnClick = Reservememory1Click
      end
      object Scanforcodecaves1: TMenuItem
        Caption = 'Scan for code caves'
        ShortCut = 49219
        OnClick = Scanforcodecaves1Click
      end
      object FillMemory1: TMenuItem
        Caption = 'Fill Memory'
        ShortCut = 49222
        OnClick = FillMemory1Click
      end
      object CreateThread1: TMenuItem
        Caption = 'Create Thread'
        ShortCut = 49236
        OnClick = CreateThread1Click
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object Dissectcode1: TMenuItem
        Caption = 'Dissect code'
        ShortCut = 16458
        OnClick = Dissectcode1Click
      end
      object Dissectdata2: TMenuItem
        Caption = 'Dissect data'
        ShortCut = 16452
        OnClick = Dissectdata2Click
      end
      object Disectwindow1: TMenuItem
        Caption = 'Dissect window(s)'
        ShortCut = 16471
        OnClick = Disectwindow1Click
      end
      object DissectPEheaders1: TMenuItem
        Caption = 'Dissect PE headers'
        ShortCut = 49232
        OnClick = DissectPEheaders1Click
      end
      object N12: TMenuItem
        Caption = '-'
      end
      object Dissectdata1: TMenuItem
        Caption = 'Pointer scan'
        ShortCut = 16464
        OnClick = Dissectdata1Click
      end
      object Findstaticpointers1: TMenuItem
        Caption = 'Find static addresses'
        ShortCut = 49235
        OnClick = Findstaticpointers1Click
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object InjectDLL1: TMenuItem
        Caption = 'Inject DLL'
        ShortCut = 16457
        OnClick = InjectDLL1Click
      end
      object AutoInject1: TMenuItem
        Caption = 'Auto Assemble'
        ShortCut = 16449
        OnClick = AutoInject1Click
      end
      object ScriptEngine1: TMenuItem
        Caption = 'Script Engine'
        ShortCut = 49217
        OnClick = ScriptEngine1Click
      end
    end
    object Kerneltools1: TMenuItem
      Caption = 'Kernel tools'
      object Allocatenonpagedmemory1: TMenuItem
        Caption = 'Allocate nonpaged memory'
        OnClick = Allocatenonpagedmemory1Click
      end
      object Getaddress1: TMenuItem
        Caption = 'Get address'
        OnClick = Getaddress1Click
      end
      object Driverlist1: TMenuItem
        Caption = 'Driver list'
        OnClick = Driverlist1Click
      end
      object Sericedescriptortable1: TMenuItem
        Caption = 'Service Descriptor Table'
        OnClick = Sericedescriptortable1Click
      end
      object GDTlist1: TMenuItem
        Caption = 'GDT list'
        OnClick = GDTlist1Click
      end
      object IDTlist1: TMenuItem
        Caption = 'IDT list'
        OnClick = IDTlist1Click
      end
    end
    object Plugins1: TMenuItem
      Caption = 'Plugins'
      Visible = False
    end
  end
  object OpenMemory: TOpenDialog
    DefaultExt = 'CEM'
    Filter = 'Cheat Engine Memory file|*.CEM|All Files (*.*)|*.*'
    FilterIndex = 0
    Top = 40
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'textfiles (*.txt)|*.txt'
    Left = 32
    Top = 40
  end
  object OpenDllDialog: TOpenDialog
    DefaultExt = 'dll'
    Filter = 'Dll-file (*.dll)|*.dll|All files (*.*)|*.*'
    Title = 'Select the module you want to inject'
    Top = 64
  end
end