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

孤星S

【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

myypvst

下了试试。 好用追评

weiba963

Sunkai

来来来  学习学习，

1664252013

6666666666666学习下

happyweeks365

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

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

孤星S

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

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

孤星S

发源码咯!!!

1250646049

很给力，希望开源

yaowen

很感动， 很给力，希望开源                  

2446789312

有没有完整的E源码