易语言MessageBoxIndirect应用源码

系统结构:MessageBoxIndirect,MessageBoxIndirectA,GetModuleHandleA,LoadIconA,MessageBoxA,LocalSize,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ MessageBoxIndirect
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   MessageBoxIndirectA
           |  |
           |  |---[dll]------   GetModuleHandleA
           |  |
           |  |---[dll]------   LoadIconA
           |  |
           |  |---[dll]------   MessageBoxA
           |  |
           |  |---[dll]------   LocalSize

调用的DLL命令:

.DLL命令 MessageBoxIndirectA, 整数型, "user32", "MessageBoxIndirectA"
    .参数 lpMsgBoxParams, MSGBOXPARAMS

.DLL命令 GetModuleHandleA, 整数型, "kernel32", "GetModuleHandleA", , 获取一个应用程序或动态链接库的模块句柄  如执行成功成功，则返回模块句柄。零表示失败。会设置GetLastError
    .参数 lpModuleName, 文本型, , 指定模块名，这通常是与模块的文件名相同的一个名字。例如，NOTEPAD.EXE程序的模块文件名就叫作NOTEPAD;

.DLL命令 LoadIconA, 整数型, "user32", "LoadIconA", , 从指定的模块或应用程序实例中载入一个图标。其中，LoadIconBynum是LoadIcon函数的类型security声明  执行成功则返回已载入的图标的句柄；零表示失败。会设置GetLastError
    .参数 实例句柄, 整数型
    .参数 图标标识, 文本型

.DLL命令 MessageBoxA, 整数型, "user32", "MessageBoxA"
    .参数 hwnd, 整数型
    .参数 lpText, 文本型
    .参数 lpCaption, 文本型
    .参数 wType, 整数型

.DLL命令 LocalSize, 整数型, "kernel32", "LocalSize"
    .参数 hMem, 整数型