易语言重置托盘图标

系统结构:置托盘图标_刷新,托盘处理,置窗口信息,置窗口信息_调,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 置托盘图标_刷新
           |  |
           |  |------ 托盘处理
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   置窗口信息
           |  |
           |  |---[dll]------   置窗口信息_调

调用的DLL命令:

.DLL命令 置窗口信息, 整数型, , "SetWindowLongA", 公开, 窗口信息 ＝ 置窗口信息 (取窗口句柄(), -4, &回调),回调里面必须  返回 (置窗口信息_调 (窗口信息, 窗口句柄, 消息类型, 消息值1, 消息值2))
    .参数 窗口句柄, 整数型
    .参数 取回信息, 整数型, , -4  就行
    .参数 信息新值, 子程序指针

.DLL命令 置窗口信息_调, 整数型, "user32.dll", "CallWindowProcA", 公开,  窗口信息 ＝ 置窗口信息 (取窗口句柄(), -4, &回调),回调里面必须  返回 (置窗口信息_调 (窗口信息, 窗口句柄, 消息类型, 消息值1, 消息值2))
    .参数 过程指针, 整数型
    .参数 过程句柄, 整数型
    .参数 消息类型, 整数型
    .参数 特定信息1, 整数型
    .参数 特定信息2, 整数型