超酷炫win10右下角通知弹窗附Direct2D模块

易语言 2020-03-17 17:54:05

超酷炫win10右下角通知弹窗附Direct2D模块

.如果真 (消息内容 = 1011 且 附加参数1 = 10)
.判断循环首 (取数组成员数 (队列窗口) > 0)
i = i + 1
.如果真 (i > 10) ' 避免死循环
跳出循环 ()
.如果真结束
r.弹窗 (队列窗口 [1].a_标题, 队列窗口 [1].a_内容, 队列窗口 [1].主题颜色, 队列窗口 [1].标题颜色, 队列窗口 [1].内容颜色, 队列窗口 [1].超时时间, 队列窗口 [1].鼠标函数, 队列窗口 [1].自定义文字, 队列窗口 [1].标志)
删除成员 (队列窗口, 1, 1)
.判断循环尾 ()
' old = 原事件ID
' 原事件ID = 0 ' 注销,还给原本的窗口!
' 调试输出 (“退出循环”)
.如果真结束
返回 (呼叫窗口函数地址_ (原事件ID, 窗口句柄, 消息内容, 附加参数1, 附加参数2))