易语言 内嵌汇编调用API 简单示例

会思考的树

.版本 2

.子程序 TestMsgBox, , ,
.参数 Title, 文本型, 参考
.参数 Content, 文本型, 参考
.局部变量 lpAddr, 整数型

lpAddr ＝ GetProcAddress (GetModuleHandle (“user32.dll”), “MessageBoxA”)
置入代码 ({ 96, 139, 69, 8, 139, 0, 106, 64, 80, 139, 69, 12, 139, 0, 80, 106, 0, 139, 69, 252, 255, 208, 97, 201, 194, 8, 0 })
' pushad
' mov eax,dword ptr[ebp+8]
' mov eax,dword ptr[eax]
' push 40
' push eax
' mov eax,dword ptr[ebp+c]
' mov eax,dword ptr[eax]
' push eax
' push 0
' mov eax,dword ptr[ebp-4]
' call eax
' popad
' leave
' retn 8