vc转delphi问题
请问哪位大神能帮我看看我这句转得对不对 老是会出错。
编译没提示错误 但是运行程序的话会出错
我用API HOOK拦截了dr0-dr3 然后发现假如我dr0:=$123456
而其他dr1-dr3我都不设置 但是拦截到之后却发现dr0:=$123456. dr1-dr3都会有数据
而我用vc试过却只拦截到dr0=123456其他dr都是0
VC:
C/C++ code:
DWORD WINAPI debugProc(LPVOID lpParameter )
{
if(debuger1.caozuo==1)
{
RefreshThreadList(GetCurrentProcessId());
for(int i=0;i<100;i++)
{
if(lst==0)
{
break;
}
if(lst!=GetCurrentThreadId())
{
HANDLE thd=OpenThread(THREAD_ALL_ACCESS,true,lst);
SuspendThread(thd);
CONTEXT con;
con.ContextFlags=CONTEXT_CONTROL|CONTEXT_DEBUG_REGISTERS;
GetThreadContext(thd,&con);
if(debuger1.dr==0)
{
con.Dr0=debuger1.addr;
con.Dr7=con.Dr7|0x3;
}
if(debuger1.dr==1)
{
con.Dr1=debuger1.addr;
相关问答：
程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了
没有什么特殊要求。例如，只要� ......
1、我能否在delphi里调用另外一个后台程序，但是我不需要等待这个后台程序执行完成，还可以继续执行别的程序。请问具体怎么样才能实现。
2、我能否在delphi上执行一个快捷键，使delphi窗口程序能够刷新一下。[/size ......
//DLL 放在EXE中没问题
function SkinForm(var skfrm:TForm):Integer;stdcall;
var
skf:TbsBusinessSkinForm;
nskfrm:TForm;
begin
frmUUMain:=skfrm;
skf:=TbsBus ......
请问VC中的
C/C++ code:
for(int i=0;i<100;i++)
该怎么转成delphi 还有VC中的break
delphi是break还是exit?
exit的话是直接退出函数,break是从循环中退出
......
t5:=' 1=1 ';
if CheckBox5.Checked then
t5:=' 生日>=#'+DateToStr(DateTimePicker1.Date)+'# and 生日<=#'+DateToStr(DateTimePicker2.Date)+'#';
关于事件的格式和界定符，access,sq ......
