易语言动态修改鼠标指针源码

系统结构:事件_初始化,GetModuleHandle,EndDialog,LoadCursor,SetCursor,DialogBoxParam,CloseHandle,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 事件_初始化
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   EndDialog
           |  |
           |  |---[dll]------   LoadCursor
           |  |
           |  |---[dll]------   SetCursor
           |  |
           |  |---[dll]------   DialogBoxParam
           |  |
           |  |---[dll]------   CloseHandle

调用的DLL命令:

.DLL命令 GetModuleHandle, 整数型, , "GetModuleHandleA"
    .参数 lpModuleName, 整数型

.DLL命令 EndDialog, 整数型
    .参数 hWnd, 整数型
    .参数 nResult, 整数型

.DLL命令 LoadCursor, 整数型, , "LoadCursorA"
    .参数 hInstance, 整数型
    .参数 lpCursorName, 整数型

.DLL命令 SetCursor, 整数型, , "SetCursor"
    .参数 hCursor, 整数型

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

.DLL命令 CloseHandle, 整数型, , "CloseHandle"
    .参数 object, 整数型