软件窗口靠边收缩扩展完美版

找了很多窗口_靠边隐藏的源码例子,都不怎么满意，于是才写了一个.已经很完美了。

.子程序 窗口_靠边隐藏, , 公开, 当程序靠近电脑屏幕边缘时自动隐藏。当用户鼠标靠近时自动弹出。(无需添加时钟事件，直接使用即可。支持WIN8 window10 的窄边窗口。)
.参数 窗口名称, 窗口, , 填写欲靠边隐藏的窗口名称，如: _靠边隐藏（窗口1）；
.参数 时间间隔, 整数型, 可空, 间隔数值越大，隐藏与呼出的等待时间越久。单位为（毫秒）可省略。默认为最快；0表示不隐藏

集_窗口 ＝ 窗口名称
.如果 (是否为空 (时间间隔) ＝ 真)
时间间隔 ＝ 150
时钟_启动 (时间间隔, &子程序_显示隐藏)
.否则
.如果真 (时间间隔 ＝ 0)
子程序_销毁时钟 ()
返回 ()
.如果真结束

.如果结束
时钟_启动 (时间间隔, &子程序_显示隐藏)