用户组 
易积分1278
热心0
好评0
|
发表于 2018-9-11 15:39:21
来自手机
|
显示全部楼层
881008 发表于 2018-9-11 14:13
这样不好解决,你把代码贴上来看
事件 按钮1.被单击()
如果 编辑框账号.内容 = "" 则
弹出提示("请输入账号")
否则如果 编辑框密码.内容 = "" 则
弹出提示("请输入密码")
否则如果 编辑框超级密码.内容 = "" 则
弹出提示("请输入超级密码")
否则
编辑框账号.隐藏输入法()
编辑框密码.隐藏输入法()
编辑框超级密码.隐藏输入法()
显示进度对话框("正在注册....")
多线程1.开始发送网络数据(公用模块.用户_接口 &"/api.php?action=register","user="& 编辑框账号.内容 &"&password="& 编辑框密码.内容 &"&superpass="& 编辑框超级密码.内容 & "&inv=" & 编辑框邀请人.内容 & "®code="& 公用模块.机器码,"utf8")
结束 如果
结束 事件
事件 多线程1.发送网络数据完毕(结果 为 文本型)
关闭进度对话框()
如果 结果 = "" 则
弹出提示("当前网络不给力,请重新尝试")
否则如果 寻找文本(结果,"101",0) <> -1 则
弹出提示("您的账号不能为空")
否则如果 寻找文本(结果,"102",0) <> -1 则
弹出提示("您的密码不能为空")
否则如果 寻找文本(结果,"103",0) <> -1 则
弹出提示("您的超级密码不能为空")
否则如果 寻找文本(结果,"104",0) <> -1 则
弹出提示("注册信息错误104")
否则如果 寻找文本(结果,"105",0) <> -1 则
弹出提示("该账号已被注册")
编辑框账号.内容 = ""
否则如果 寻找文本(结果,"106",0) <> -1 则
弹出提示("您今天已经注册过一次了,请明天再来")
否则如果 寻找文本(结果,"107",0) <> -1 则
弹出提示("您今天已经注册过一次了,请明天再来")
否则如果 寻找文本(结果,"200",0) <> -1 则
如果 信息框2("温馨提示","恭喜你注册成功,是否前往登入?","立即登入","暂不登入") = 0 则
保存设置("账号",编辑框账号.内容)
保存设置("密码",编辑框密码.内容)
注册.开启特效(3,600,假)
公用模块.切换登入()
结束 如果
否则
弹出提示("注册失败,请重新尝试")
结束 如果
结束 事件
过程 返回()
注册.开启特效(3,600,假)
公用模块.切换登入()
结束 过程
事件 图片框返回.被单击()
返回()
结束 事件
事件 注册.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
如果 键代码 = 返回键 则
返回()
结束 如果
结束 事件
事件 注册.创建完毕()
标签主题.顶边 = 取状态栏高度()
图片框返回.顶边 = 取状态栏高度()
图片框1.顶边 = 图片框1.顶边 + 取状态栏高度()
按钮1.顶边 = 按钮1.顶边 + 取状态栏高度()
标签账号.顶边 = 标签账号.顶边 + 取状态栏高度()
标签邀请人.顶边 = 标签邀请人.顶边 + 取状态栏高度()
标签超级密码.顶边 = 标签超级密码.顶边 + 取状态栏高度()
标签密码.顶边 = 标签密码.顶边 + 取状态栏高度()
编辑框密码.顶边 = 编辑框密码.顶边 + 取状态栏高度()
编辑框账号.顶边 = 编辑框账号.顶边 + 取状态栏高度()
编辑框超级密码.顶边 = 编辑框超级密码.顶边 + 取状态栏高度()
编辑框邀请人.顶边 = 编辑框邀请人.顶边 + 取状态栏高度()
结束 事件 |
|