验证简易例子调用For3.6客户端

陌辞BOY

验证简易例子调用For3.6客户端
不知道为什么，很多人在使用陌辞云验证官方提供的调用实例时 都会有各种各样的问题
于是我就趁机写了简易版本的例子（For3.6客户端模块）
没有携带任何其他模块，完完全全就只是调用验证的例子，用于排查问题


因为此例子是针对小白的，所以我基本上都标上了注释，方便小白去理解
下面显示的是启动窗口（登录）的代码
项目TOKEN和项目版本请自己更换成自己后台的项目信息


如果仍然存在问题 可以参考下面给出的帖子尝试自行解决
客户端模块3.6 及 客户端初始化失败常见问题的解决方案
https://bbs.moci.club/thread-410-1-1.html

界面截图：

功能窗口

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
此版本	文本型

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

变量名	类 型	静态	数组	备 注
返回错误	文本型

此版本 ＝ “项目版本”  ' 此程序的版本号，请自行修改
判断 (陌辞云_初始化 (“项目TOKEN”, 此版本, 真, 1, , 返回错误, 真, , 真))  ' 初始化
' 初始化成功
标签_项目公告.标题 ＝ 陌辞云_取项目公告 ()  ' 获取初始化时使用的TOKEN对应的项目公告
标签_版本公告.标题 ＝ 陌辞云_取版本公告1 ()  ' 获取初始化时使用的TOKEN对应的项目的对应版本的版本公告
编辑框_单码卡密.内容 ＝ 读配置项 (取特定目录 (11) ＋ “moci_user”, 取执行文件名 (), “user”, )  ' 读取上次登录保存的卡密

信息框 (返回错误, 0, “客户端初始化失败”, )  ' 显示信息
结束 ()  ' 初始化失败后退出

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

变量名	类 型	静态	数组	备 注
返回数据	逻辑型
返回错误	文本型

如果真 (取文本长度 (编辑框_单码卡密.内容) ＜ 32)
' 过滤乱输的 减轻服务器负担
信息框 (“卡密位数低于最低限制”, 0, “客户端登录失败”, )  ' 显示信息
返回 ()  ' 不再继续执行下面的代码
按钮_登录.禁止 ＝ 真
陌辞云_退登2 (编辑框_单码卡密.内容)  ' 防止多开 登录前先退登此卡
返回数据 ＝ 陌辞云_单码登录 (编辑框_单码卡密.内容, 陌辞_取机器码 (), 返回错误)  ' 登录 将登录后返回的信息存储到返回数据里 为真即为登录成功 返回错误用于登录失败后返回具体原因
判断 (返回数据)  ' 判断登录状态
' 登录成功
写配置项 (取特定目录 (11) ＋ “moci_user”, 取执行文件名 (), “user”, 编辑框_单码卡密.内容)  ' 保存本次登录的卡密
载入 (功能窗口, , 假)  ' 载入功能窗口
按钮_登录.禁止 ＝ 假
销毁 ()  ' 销毁登录窗口


' 登录失败
信息框 (返回错误, 0, “客户端登录失败”, )  ' 显示信息
按钮_登录.禁止 ＝ 假

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

变量名	类 型	静态	数组	备 注
返回错误	文本型

按钮_解绑.禁止 ＝ 真
如果真 (取文本长度 (编辑框_单码卡密.内容) ＜ 32)  ' 过滤乱输的 减轻服务器负担
标签_提示.标题 ＝ “未输入卡密”
返回 ()
如果真 (陌辞云_用户解绑 (编辑框_单码卡密.内容, 返回错误))
标签_提示.标题 ＝ “解绑成功”
返回 ()
标签_提示.标题 ＝ 返回错误
按钮_解绑.禁止 ＝ 假

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 此版本, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 返回错误, 文本型<br /> <br /> 此版本 ＝ “项目版本”  ' 此程序的版本号，请自行修改<br /> .判断开始 (陌辞云_初始化 (“项目TOKEN”, 此版本, 真, 1, , 返回错误, 真, , 真))  ' 初始化<br />     ' 初始化成功<br />     标签_项目公告.标题 ＝ 陌辞云_取项目公告 ()  ' 获取初始化时使用的TOKEN对应的项目公告<br />     标签_版本公告.标题 ＝ 陌辞云_取版本公告1 ()  ' 获取初始化时使用的TOKEN对应的项目的对应版本的版本公告<br />     编辑框_单码卡密.内容 ＝ 读配置项 (取特定目录 (11) ＋ “moci_user”, 取执行文件名 (), “user”, )  ' 读取上次登录保存的卡密<br /> <br /> .默认<br />     信息框 (返回错误, 0, “客户端初始化失败”, )  ' 显示信息<br />     结束 ()  ' 初始化失败后退出<br /> .判断结束<br /> <br /> <br /> .子程序 _按钮_登录_被单击<br /> .局部变量 返回数据, 逻辑型<br /> .局部变量 返回错误, 文本型<br /> <br /> <br /> .如果真 (取文本长度 (编辑框_单码卡密.内容) ＜ 32)<br />     ' 过滤乱输的 减轻服务器负担<br />     信息框 (“卡密位数低于最低限制”, 0, “客户端登录失败”, )  ' 显示信息<br />     返回 ()  ' 不再继续执行下面的代码<br /> .如果真结束<br /> 按钮_登录.禁止 ＝ 真<br /> 陌辞云_退登2 (编辑框_单码卡密.内容)  ' 防止多开 登录前先退登此卡<br /> <br /> 返回数据 ＝ 陌辞云_单码登录 (编辑框_单码卡密.内容, 陌辞_取机器码 (), 返回错误)  ' 登录 将登录后返回的信息存储到返回数据里 为真即为登录成功 返回错误用于登录失败后返回具体原因<br /> .判断开始 (返回数据)  ' 判断登录状态<br />     ' 登录成功<br />     写配置项 (取特定目录 (11) ＋ “moci_user”, 取执行文件名 (), “user”, 编辑框_单码卡密.内容)  ' 保存本次登录的卡密<br /> <br />     载入 (功能窗口, , 假)  ' 载入功能窗口<br />     按钮_登录.禁止 ＝ 假<br />     销毁 ()  ' 销毁登录窗口<br /> .默认<br /> <br />     ' 登录失败<br />     信息框 (返回错误, 0, “客户端登录失败”, )  ' 显示信息<br />     按钮_登录.禁止 ＝ 假<br /> .判断结束<br /> <br /> <br /> .子程序 _按钮_解绑_被单击<br /> .局部变量 返回错误, 文本型<br /> <br /> 按钮_解绑.禁止 ＝ 真<br /> .如果真 (取文本长度 (编辑框_单码卡密.内容) ＜ 32)  ' 过滤乱输的 减轻服务器负担<br />     标签_提示.标题 ＝ “未输入卡密”<br />     返回 ()<br /> .如果真结束<br /> .如果真 (陌辞云_用户解绑 (编辑框_单码卡密.内容, 返回错误))<br />     标签_提示.标题 ＝ “解绑成功”<br />     返回 ()<br /> .如果真结束<br /> 标签_提示.标题 ＝ 返回错误<br /> 按钮_解绑.禁止 ＝ 假

注：解压密码：bbs.moci.club

幻苍秋

爽爽爽

1413939558

看了LZ的帖子，我只想说一句很好很强大！

gongyanliang12

看了LZ的帖子，我只想说一句很好很强大！

浪客

楼主发贴辛苦了，谢谢楼主分享！

liu66

我就喜欢楼主这种风格！

3341481042

看了LZ的帖子，我只想说一句很好很强大！