WinGet, pid, PID, ahk_exe explorer.exe
基址 := GetModuleBaseAddr("kernel32.dll", pid)
MsgBox % "Addr:" 基址.Addr "`nSize:" 基址.Size

; https://www.autohotkey.com/boards/viewtopic.php?t=19323
GetModuleBaseAddr(ModuleName, ProcessID)
{
  if !(hSnapshot := DllCall("CreateToolhelp32Snapshot", "uint", 0x18, "uint", ProcessID))
    return "Error in CreateToolhelp32Snapshot"

  NumPut(VarSetCapacity(MODULEENTRY32, (A_PtrSize = 8 ? 568 : 548), 0), MODULEENTRY32, "uint")
  if !(DllCall("Module32First", "ptr", hSnapshot, "ptr", &MODULEENTRY32))
    return "Error in Module32First", DllCall("CloseHandle", "ptr", hSnapshot)

  ME32 := {}
  while (DllCall("Module32Next", "ptr", hSnapshot, "ptr", &MODULEENTRY32)) {
    if (ModuleName = StrGet(&MODULEENTRY32+ (A_PtrSize = 8 ? 48 : 32), 256, "cp0")) {
      ME32.Addr := Format("{:#016x}", NumGet(MODULEENTRY32, (A_PtrSize = 8 ? 24 : 20), "uptr"))
      ME32.Size := Format("{:#016x}", NumGet(MODULEENTRY32, (A_PtrSize = 8 ? 32 : 24), "uint"))
    }
  }

  return ME32, DllCall("CloseHandle", "ptr", hSnapshot)
}

 

声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。