如何取一个程序已经加载的 dll基址

[代码跳动]

说明:

我找到一个游戏程序的基址,但在游戏重新启动后仍然会有变化, 但xxx.dll+5778 这个偏移是不变的.
xxx.dll的基址+5778 这个地址就可以得到这个游戏基址.


问题:

基址会根据这个dll的载入点不同变化? 如何取得这个xxx.dll的基址? 希望给出代码!

[etomahawk]

var
  hLib: THandle;
  tInf: TModuleInfo;
begin
  hLib:= LoadLibray('xxx.dll');

  if hLib <> 0 then
  begin
    GetModuleInformation(GetCurrentProcess, hLib, @tInf, SizeOf(tInf));

    // 这个就是你想要的:
    // tInf.lpBaseOfDll^
  end;
  //...
end;

[代码跳动]

[Quote=引用 1 楼 etomahawk 的回复:]
Delphi(Pascal) codevar
hLib: THandle;
tInf: TModuleInfo; //这里报错,是要在uses里声明什么吗?
begin
hLib:= LoadLibray('xxx.dll');

if hLib <> 0 then
begin
GetModuleInformation(GetCurrentProcess, hLib, @tInf, SizeOf(tInf));

// 这个就是你想要的:
// tInf.lpBaseOfDll^ 如果用edit1.text:=pchar(@tinf); 这样能显示地址吗?
end;
//...
end;
[/Quote]

谢谢,菜鸟就是麻烦,多理解!

[etomahawk]

uses
psapi;

//不好意思，写错一个单词： LoadLibrary

edit1.Text:= Format('%d', [DWORD(tInf.lpBaseOfDll)]);

[代码跳动]

太感谢了,对你的仰慕之情......

[ljxiaobao]

你好，怎么我用不了？读不出这个DLL的基址？