易语言圆点鼠标源码

系统结构:CreatWindows,事件_背景重画,事件_将被销毁,鼠标钩子回调函数,回调_缓动特效,创建,PaintObj,图形_描边_椭圆,开始动画,GdipDrawEllipseI,SetWindowsHookEx,GetModuleHandle,UnhookWindowsHookEx,CallNextHookEx,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ CreatWindows
           |  |
           |  |------ 事件_背景重画
           |  |
           |  |------ 事件_将被销毁
           |  |
           |  |------ 鼠标钩子回调函数
           |  |
           |  |
======扩展组件_Ex
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ _ObjProc
           |  |
           |  |------ 回调_缓动特效
           |  |
           |  |------ 创建
           |  |
           |  |------ PaintObj
           |  |
           |  |------ 图形_描边_椭圆
           |  |
           |  |------ 开始动画
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GdipDrawEllipseI
           |  |
           |  |---[dll]------   SetWindowsHookEx
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   UnhookWindowsHookEx
           |  |
           |  |---[dll]------   CallNextHookEx

调用的DLL命令:

.DLL命令 GdipDrawEllipseI, 整数型, "gdiplus.dll", "GdipDrawEllipseI"
    .参数 graphics, 整数型
    .参数 pen, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 Width, 整数型
    .参数 Height, 整数型

.DLL命令 SetWindowsHookEx, 整数型, , "SetWindowsHookExA", 公开, 钩子
    .参数 ihook, 整数型
    .参数 lpfunc, 子程序指针
    .参数 hin, 整数型
    .参数 threadid, 整数型

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

.DLL命令 UnhookWindowsHookEx, 整数型, , "UnhookWindowsHookEx", 公开, 钩子
    .参数 hHook, 整数型

.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx", 公开, 钩子
    .参数 hHook, 整数型
    .参数 icode, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型