易语言api托盘图标源码

系统结构:启动窗口可视子程序,置托盘图标气泡子程序,托盘事件处理,设置窗口信息_,获取消息编号_,取结构体大小,取字节数据地址_,托盘图标刷新_,发送消息_,呼叫窗口函数地址_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮创建图标_被单击
           |  |
           |  |------ _按钮删除图标_被单击
           |  |
           |  |------ _按钮气泡_被单击
           |  |
           |  |------ 启动窗口可视子程序
           |  |
           |  |------ _退出_被选择
           |  |
           |  |
======程序集1
           |  |
           |  |------ _删除托盘图标
           |  |
           |  |------ _置托盘图标
           |  |
           |  |------ 置托盘图标气泡子程序
           |  |
           |  |------ 托盘事件处理
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置窗口信息_
           |  |
           |  |---[dll]------   获取消息编号_
           |  |
           |  |---[dll]------   取结构体大小
           |  |
           |  |---[dll]------   取字节数据地址_
           |  |
           |  |---[dll]------   托盘图标刷新_
           |  |
           |  |---[dll]------   发送消息_
           |  |
           |  |---[dll]------   呼叫窗口函数地址_

调用的DLL命令:

.DLL命令 设置窗口信息_, 子程序指针, "user32", "SetWindowLongA", , SetWindowLong
    .参数 窗口句柄, 整数型, , HWnd
    .参数 窗口信息值, 整数型, , nIndex
    .参数 窗口信息新值, 子程序指针, , dwNewLong

.DLL命令 获取消息编号_, 整数型, , "RegisterWindowMessageA", , RegisterWindowMessageA
    .参数 消息名称, 文本型, , lpString

.DLL命令 取结构体大小, 整数型, , "LocalSize"
    .参数 参数一, 托盘消息结构, 传址

.DLL命令 取字节数据地址_, 整数型, , "lstrcpyn", , lstrcpyn
    .参数 数据1, 字节型, 数组, lpString1
    .参数 数据2, 文本型, , lpString2
    .参数 数据长度, 整数型, , iMaxLength

.DLL命令 托盘图标刷新_, 整数型, "shell32.dll", "Shell_NotifyIconA", , Shell_NotifyIconA
    .参数 消息值, 整数型, , dwMessage
    .参数 图标通报结构, 托盘消息结构, , lpData

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

.DLL命令 呼叫窗口函数地址_, 整数型, "user32", "CallWindowProcA", , CallWindowProc
    .参数 前一窗口函数地址, 子程序指针, , lpPrevWndFunc
    .参数 窗口句柄, 整数型, , HWnd
    .参数 消息值, 整数型, , Msg
    .参数 附加参数1, 整数型, , wParam
    .参数 附加参数2, 整数型, , lParam