Question

易语言贴边隐藏后双击托盘图标弹出，求高手给个源码。

我已经实现了贴边隐藏+双击托盘图标的缩小启动窗口.会弹出，却实现不了贴边隐藏在屏幕左.右.上，双击托盘图标弹出，
如图：

实现这样的效果。
希望高手帮忙给个源码。





Answer 1

要的是贴边隐藏效果吗?

追问

要的是贴边隐藏后双击托盘图标弹出，仿QQ弹出

追答

..代码写完了 但是上传不了 加QQ1076102657

.版本 2

.程序集 窗口程序集1

.子程序 _时钟1_周期事件

.判断开始 (_启动窗口.顶边 ＜ 5 且 鼠标是否在窗口内 () ＝ 假 且 弹出 ＝ 假)

    延时 ＝ 延时 ＋ 1

    .如果真 (延时 ＞ 100)

        _启动窗口.顶边 ＝ 5 － _启动窗口.高度

        延时 ＝ 0

    .如果真结束

.判断 (鼠标是否在窗口内 () ＝ 真 且 _启动窗口.顶边 ＜ 0)

    弹出 ＝ 真

    延时 ＝ 0

.默认

.判断结束

.如果真 (弹出 ＝ 真)

    _启动窗口.顶边 ＝ _启动窗口.顶边 ＋ 10

    .如果真 (_启动窗口.顶边 ＞ 0)

        _启动窗口.顶边 ＝ 0

        弹出 ＝ 假

    .如果真结束

.如果真结束

.子程序 鼠标是否在窗口内, 逻辑型

.如果真 (取鼠标水平位置 () ＞ _启动窗口.左边 且 取鼠标水平位置 () ＜ _启动窗口.左边 ＋ _启动窗口.宽度)

    .如果真 (取鼠标垂直位置 () ＞ _启动窗口.顶边 － 5 且 取鼠标垂直位置 () ＜ _启动窗口.顶边 ＋ _启动窗口.高度)

        返回 (真)

    .如果真结束

.如果真结束

返回 (假)

.子程序 __启动窗口_创建完毕

_启动窗口.顶边 ＝ 0

置托盘图标 (_启动窗口.图标, )

.子程序 __启动窗口_托盘事件

.参数 操作类型, 整数型

.如果真 (操作类型 ＝ 2)

    弹出 ＝ 真

.如果真结束

.版本 2

.全局变量 弹出, 逻辑型

.全局变量 延时, 整数型