WinAPI: ReadProcessMemory 读取指定进程内存数据

WinAPI: ReadProcessMemory 读取指定进程内存数据

函数功能描述:该函数用来读取指定进程的空间的数据,此空间必须是可以访问的,否则读取操作会失败!函数原型

BOOL ReadProcessMemory(

HANDLE hProcess,   // 目标进程句柄

LPCVOID lpBaseAddress, // 读取数据的起始地址

LPVOID lpBuffer, // 存放数据的缓存区地址

DWORD nSize,      // 要读取的字节数

LPDWORD lpNumberOfBytesRead // 实际读取数存放地址

);

参数

hProcess                            目标进程的句柄，该句柄必须对目标进程具有PROCESS_VM_READ 的访问权限。

lpBaseAddress                    从目标进程中读取数据的起始地址。在读取数据前，系统将先检验该地址的数据是否可读，如果不可读，函数将调用失败。

lpBuffer                              用来接收数据的缓存区地址。

nSize                                 从目标进程读取数据的字节数。

lpNumberOfBytesRead         实际被读取数据大小的存放地址。如果被指定为NULL,那么将忽略此参数。

返回值                                如果函数执行成功，返回值非零。

--------------------------------------------------------------------------------------------

如果函数执行失败，返回值为零。调用 GetLastError 函数可以获取该函数执行错误的信息。

如果要读取一个进程中不可访问空间的数据，该函数就会失败。

备注

        ReadProcessMemory 函数从目标进程复制指定大小的数据到自己进程的缓存区，任何拥有PROCESS_VM_READ 权限句柄的进程都可以调用该函数，目标进程的地址空间很显然要是可读的，但也并不是必须的，如果目标进程处于被调试状态的话。

使用环境[包括适合WINDOWS的版本、所需头文件、所需链接库]

Windows NT: 要求3.1或更高版本

Windows: 要求 Windows 95 或更高版本

Windows CE: 不支持

头文件: winbase.h

输入库: kernel32.lib.

文章引用自： http://blog.sina.com.cn/s/blog_4a592a51010005pb.html

读取内存流程

1.获得程序的句柄---->findwindow

2.获得进程ID---->GetWindowThreadProcessId

3.获得进程句柄---->OpenProcess

4.内存操作(读取写放)---->ReadProcessMemory

下面用扫雷做下测试,当雷少于8时提示:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

    Button1: TButton;

    procedure Button1Click(Sender: TObject);

private

    { Private declarations }

public

    { Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var

   pid: dword;              //定义变量类型

   hw: hwnd;

   pHandle,pAddr: DWORD;    //很重要

   mNum,tmpNum: DWORD;      //很重要

begin

   hw:= findwindow(nil,'扫雷');     //获得扫雷程序的句柄

   if hw = 0 then                   //没打开关闭

   form1.Close;

   GetWindowThreadProcessId(hw,@pid); //获得进程ID

   pHandle:= OpenProcess(PROCESS_ALL_ACCESS,false,pid);//获得进程句柄

   if pHandle = 0 then

   form1.Close;

   pAddr:= $01005194;   //查找的内存地址

   ReadProcessMemory(pHandle, Pointer(pAddr), Pointer(@mNum),sizeof(mNum),tmpNum); //记得格式

   if mNum < 8 then

   begin

   button1.Caption := '成功';

   end

   else

   begin

   button1.Caption := '失败';

   end;

   CloseHandle(pHandle); //关闭句柄释放内存

end;

end.