觅风第18课仿迅雷悬浮窗口源码

黑夜·空白

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

_启动窗口.左边 ＝ 取屏幕宽度 () － 100  ' _启动窗口. 可不写

子程序名	返回值类型	公开	备 注
__启动窗口_鼠标右键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

弹出菜单 (菜单, , )

子程序名	返回值类型	公开	备 注
__启动窗口_被双击	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

载入 (窗口1, , 假)

子程序名	返回值类型	公开	备 注
_打开程序_被选择

载入 (窗口1, , 假)

子程序名	返回值类型	公开	备 注
_关闭程序_被选择

如果 (是否已创建 (窗口1) ＝ 真)
窗口1.销毁 ()
_启动窗口.销毁 ()  ' 可行，顺序执行
_启动窗口.销毁 ()  ' 不可行，走此步，逆行

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> _启动窗口.左边 ＝ 取屏幕宽度 () － 100  ' _启动窗口. 可不写<br /> <br /> <br /> .子程序 __启动窗口_鼠标右键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 弹出菜单 (菜单, , )<br /> <br /> <br /> .子程序 __启动窗口_被双击, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 载入 (窗口1, , 假)<br /> <br /> <br /> .子程序 _打开程序_被选择<br /> <br /> 载入 (窗口1, , 假)<br /> <br /> .子程序 _关闭程序_被选择<br /> <br /> .如果 (是否已创建 (窗口1) ＝ 真)<br />     窗口1.销毁 ()<br />     _启动窗口.销毁 ()  ' 可行，顺序执行<br /> .否则<br />     _启动窗口.销毁 ()  ' 不可行，走此步，逆行

qwerkkj105

学习学习学习学习学习学习学习学习学习

小黑bb

不错学习学习！！！！

andyfeifei

支持一下的哈哈哈

bxxutiejun

不错学习学习！！！！

shitingqing

腻了静态悬浮窗，可以试试这个

qq184252904

66666666666

aamyd

11111111111111111111111111

guadm

谢谢分享！！！

swj1234

66666666666666

529881

啊哦，数据有的被跳过