易语言画板自绘菜单源码

系统结构:取主菜单索引,画焦点,透明窗口,设置窗口信息,SetForegroundWindow,dll_取坐标窗口句柄,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ 取主菜单索引
           |  |
           |  |------ _画板2_鼠标位置被移动
           |  |
           |  |------ _画板2_鼠标左键被按下
           |  |
           |  |------ _画板2_被双击
           |  |
           |  |------ _图形按钮1_被单击
           |  |
           |  |------ _图形按钮2_被单击
           |  |
           |  |------ _图形按钮3_被单击
           |  |
           |  |------ 画焦点
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   透明窗口
           |  |
           |  |---[dll]------   设置窗口信息
           |  |
           |  |---[dll]------   SetForegroundWindow
           |  |
           |  |---[dll]------   dll_取坐标窗口句柄

调用的DLL命令:

.DLL命令 透明窗口, 逻辑型, , "SetLayeredWindowAttributes", , 成功返回真，否则返回假
    .参数 hwnd, 整数型, , 透明窗体的句柄
    .参数 crKey, 整数型, , 颜色值
    .参数 bAlpha, 字节型, , 透明度，取值范围是[0,255]
    .参数 dwFlags, 整数型, , 透明方式：LWA_ALPHA(2)时，crKey参数无效，bAlpha参数有效 || LWA_COLORKEY(1)时，bAlpha参数有效而窗体中的所有颜色为crKey的地方将变为透明

.DLL命令 设置窗口信息, 整数型, , "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 SetForegroundWindow, 整数型, "user32", "SetForegroundWindow", , 将窗口设为系统的前台窗口。这个函数可用于改变用户目前正在操作的应用程序  非零表示成功，零表示失败。会设置GetLastError
    .参数 hwnd, 整数型, , 带到前台的窗口;

.DLL命令 dll_取坐标窗口句柄, 整数型, , "WindowFromPoint"
    .参数 x, 整数型
    .参数 y, 整数型