捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  粤ICP备10103342号-1 DELPHI盒子 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 盒子检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
 
广告
评论:一个非常简单的CrackMe演示
dna32r 20462 2005/12/29 17:04:29
看楼主的代码好累(看了一眼就删了~)
楼上的说的好~~简单爆破之
::00408645::  75 36          JNZ     SHORT 0040867D 
写个内存补丁
{

{
  CrackMe loader By Anskya
  Email:Anskya@Gmail.com
  Web:Www.Anskya.Net
}
program CrackMe_Loader;

uses
  Windows,TlHelp32;

const
  OldData : array[0..1] of byte = ($75,$36);
  NewData : array[0..1] of byte = ($90,$90);

var
  StartInfo: TStartupInfo;
  ProcInfo: TProcessInformation;
  BytesRead : DWORD;
  TmpData : array[0..1] of Byte;

begin
  ZeroMemory(@StartInfo, SizeOf(TStartupInfo));
  StartInfo.cb := SizeOf(TStartupInfo);
  if not CreateProcess(nil,'CrackMe.exe', nil, nil, False, Create_Suspended, nil, nil, StartInfo, ProcInfo) then Exit;
  ReadProcessMemory(ProcInfo.hProcess,Pointer($408645),@TmpData,2,BytesRead);
  if (TmpData[0] = OldData[0]) and (TmpData[1] = OldData[1]) then
  begin
    if WriteProcessMemory(ProcInfo.hProcess, Pointer($408645), @NewData, 2, BytesRead) then
      MessageBox(0,'恭喜补丁成功',nil,0) else MessageBox(0,'不好意思补丁失败',nil,0);
  end else
  begin
    MessageBox(0,'不好意思补丁失败',nil,0)
  end;
  ResumeThread(ProcInfo.hThread);
  CloseHandle(ProcInfo.hProcess);
  CloseHandle(ProcInfo.hThread);
end.

}
springkang 20346 2005/12/26 16:38:54
00408645  |. /75 36         JNZ SHORT CrackMe.0040867D  //修改成74 36

爆破之。
hsgrass 20192 2005/12/21 9:43:39
谢谢你
学习ing......
第一页 上一页 下一页 最后页 有 3 条纪录 共1页 1 - 3
 用户名:
 密 码:
自动登陆(30天有效)
 
  DELPHI盒子版权所有 技术支持:深圳市麟瑞科技有限公司 1999-2024 V4.01 粤ICP备10103342号-1 更新RSS列表