精易论坛

标题: 新手制作悬浮窗，大神勿喷 [打印本页]

---

作者: 孤星S    时间: 2016-12-17 16:25
标题: 新手制作悬浮窗，大神勿喷
【1】

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

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

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

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

弹出菜单 (菜单, , )

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

载入 (窗口1, , 假)

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

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

载入 (窗口1, , 假)

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

如果 (是否已创建 (窗口1) ＝ 真)
窗口1.销毁 ()
_启动窗口.销毁 ()
_启动窗口.销毁 ()

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

【2】

  

窗口程序集名	保 留	保 留	备 注
窗口程序集2

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

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
输入的密码	文本型
正确密码	文本型

输入的密码 ＝ 编辑框2.内容
正确密码 ＝ “123456”
如果 (输入的密码 ＝ 正确密码)
信息框 (“尊贵的白金VIP您好！登录成功！”, 0, “登录成功”)
载入 (_启动窗口, , 真)
窗口1.销毁 ()
载入 (窗口2, , 假)
信息框 (“密码错误！请检查后再次输入！”, 0, “密码错误”)
' 载入 (窗口2, , 假)

子程序名	返回值类型	公开	备 注
_按钮2_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

编辑框2.输入方式 ＝ 0

子程序名	返回值类型	公开	备 注
_按钮2_鼠标左键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

编辑框2.输入方式 ＝ 2

.版本 2<br /> <br /> .程序集 窗口程序集2<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 输入的密码, 文本型<br /> .局部变量 正确密码, 文本型<br /> <br /> 输入的密码 ＝ 编辑框2.内容<br /> 正确密码 ＝ “123456”<br /> .如果 (输入的密码 ＝ 正确密码)<br />     信息框 (“尊贵的白金VIP您好！登录成功！”, 0, “登录成功”)<br />     载入 (_启动窗口, , 真)<br />     窗口1.销毁 ()<br />     载入 (窗口2, , 假)<br /> .否则<br />     信息框 (“密码错误！请检查后再次输入！”, 0, “密码错误”)<br /> <br /> .如果结束<br /> ' 载入 (窗口2, , 假)<br /> <br /> <br /> .子程序 _按钮2_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 编辑框2.输入方式 ＝ 0<br /> <br /> .子程序 _按钮2_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> 编辑框2.输入方式 ＝ 2

---

作者: 孤星S    时间: 2016-12-17 16:26
新手制作，大神勿喷

---

作者: 胆小的老虎    时间: 2016-12-17 16:58
你传个源码吧

---

作者: fydcr    时间: 2016-12-17 17:01
这锯齿，感人！不错，支持，顶顶更健康

---

作者: happyweeks365    时间: 2016-12-17 18:05
传个源码吧传个源码吧

---

作者: 欢乐之歌    时间: 2016-12-17 19:28
很感动， 很给力，希望开源

---

作者: 千玄    时间: 2016-12-17 19:56
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 2446789312    时间: 2016-12-17 20:09
有没有完整的E源码

---

作者: yaowen    时间: 2016-12-18 11:24
很感动， 很给力，希望开源                  

---

作者: 1250646049    时间: 2016-12-18 15:18
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 孤星S    时间: 2017-1-1 00:23
发源码咯!!!

仿迅雷悬浮窗.zip

2017-1-1 00:22 上传

点击文件名下载附件

下载积分: 精币 -2 枚

3.9 KB, 下载次数: 41, 下载积分: 精币 -2 枚

仿迅雷悬浮窗，新手制作，大神勿喷

---

作者: 孤星S    时间: 2017-1-1 12:18

happyweeks365 发表于 2016-12-17 18:05
传个源码吧传个源码吧

已经传过了哦！！！！！！！！！！！1

---

作者: happyweeks365    时间: 2017-1-1 12:23

孤星S 发表于 2017-1-1 00:23
发源码咯!!!

ok.................................

---

作者: 1664252013    时间: 2017-1-10 21:46
6666666666666学习下

---

作者: Sunkai    时间: 2017-7-3 12:52
来来来  学习学习，

---

作者: weiba963    时间: 2017-8-24 13:46

---

作者: myypvst    时间: 2017-9-22 04:33
下了试试。 好用追评

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4