本帖最后由 冥界3大法王 于 2021-11-7 09:20 编辑
打开Delphi
随便插入一按钮
双击写实现:
[Delphi] 纯文本查看 复制代码 procedure TForm3.Button1Click(Sender: TObject);
begin
Application.MessageBox('【退出本程序】还是【结束x36dbg进程】?', '您打算', MB_YESNO + MB_ICONSTOP);
end;
编译成 64位的,再用x64dbg 打开
[Asm] 纯文本查看 复制代码 00000000006F919D | 48:8B8D | mov rcx,qword ptr ss:[rbp+80] | HWND hWnd
00000000006F91A4 | 48:8B95 | mov rdx,qword ptr ss:[rbp+E8] | LPCTSTR lpText = "【退出本程序】还是【结束x36dbg进程】?"
00000000006F91AB | 4C:8B85 | mov r8,qword ptr ss:[rbp+F0] | LPCTSTR lpCaption = "您打算"
00000000006F91B2 | 44:8B8D | mov r9d,dword ptr ss:[rbp+F8] | UINT uType
00000000006F91B9 | E8 A289 | call <JMP.&MessageBoxW> | MessageBoxW
感觉已经算不错了。
|