VB基础类
茫然了，，，，在线等
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区正在翻译VB的源码又遇到问题了，不得不再次求助大家，希望大家能帮助下，或者提供思路。谢谢
case EXCEPTION_DEBUG_EVENT:
{
if((DWORD)DebugEv.u.Exception.ExceptionRecord.ExceptionAddress==WAR3_BREAK_ADDRESS)
{
number++;
HANDLE hThread = OpenThread(THREAD_ALL_ACCESS, FALSE, DebugEv.dwThreadId);
SuspendThread(hThread);
CONTEXT Regs = {0};
Regs.ContextFlags = CONTEXT_DEBUG_REGISTERS|CONTEXT_INTEGER;
::GetThreadContext(hThread, ®s);
Regs.Esi=Regs.Esi+4;
Regs.Dr0=WAR3_BREAK_ADDREST;
Regs.Dr7=BREAK_OPEN;
::SetThreadContext(hThread, ®s);
ResumeThread(hThread);
CloseHandle(hThread);
}
if((DWORD)DebugEv.u.Exception.ExceptionRecord.ExceptionAddress==WAR3_BREAK_ADDREST)
{
HANDLE hThread = OpenThread(THREAD_ALL_ACCESS, FALSE, DebugEv.dwThreadId);
SuspendThread(hThread);
CONTEXT Regs = {0};
Regs.ContextFlags = CONTEXT_DEBUG_REGISTERS|CONTEXT_INTEGER;
::GetThreadContext(hThread, ®s);
Regs.Dr0=WAR3_BREAK_ADDRESS;
Regs.Dr7=BREAK_OPEN;
::SetThreadContext(hThread, ®s);
ResumeThread(hThread);
CloseHandle(hThread);
}
dwContinueStatus = DBG_CONTINUE;
break;
}
...全文
