易语言黑月程序模板源码

系统结构:取低十六位,窗体消息处理程序,DialogBoxParam,EndDialog,GetModuleHandle,SendMessage,LoadIcon,InitCommonControls,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 取低十六位
           |  |
           |  |------ 窗体消息处理程序
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   DialogBoxParam
           |  |
           |  |---[dll]------   EndDialog
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   LoadIcon
           |  |
           |  |---[dll]------   InitCommonControls

调用的DLL命令:

.DLL命令 DialogBoxParam, 整数型, , "DialogBoxParamA"
    .参数 hInstance, 整数型
    .参数 lpName, 整数型
    .参数 hWndParent, 整数型
    .参数 lpDialogFunc, 子程序指针
    .参数 dwInitParam, 整数型

.DLL命令 EndDialog, 整数型, , "EndDialog"
    .参数 hwnd, 整数型
    .参数 nResult, 整数型

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

.DLL命令 SendMessage, 整数型, "user32.dll", "SendMessageA", 公开, 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式  由具体的消息决定
    .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
    .参数 信息值, 整数型, , 消息的标识符
    .参数 参数一, 整数型, , 具体取决于消息
    .参数 参数二, 整数型, , 具体取决于消息;

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

.DLL命令 InitCommonControls, , "comctl32.dll", "InitCommonControls"