软件问题，请求懂的人帮我解决，很简单的

xiang5905 · 发表于 2011-5-26 11:27:46

问题：如果是英文的话，点生成是没问题的，但如果换成是汉语的，比如说是一篇汉语的小说，再点生成就会出现乱码，应该是取字的时候取到一半，谁能帮忙解决解决，谢谢了，源码附在最后面

英文文章生成.rar (3.12 KB, 下载次数: 13)

2011-5-26 11:27 上传

点击文件名下载附件

版本 2
.支持库 iext
.支持库 spec
.子程序 _按钮生成_被单击
.局部变量总关键词, 文本型, , "0"
.局部变量截取的文本, 文本型
.局部变量计次, 整数型
.局部变量总关键词数, 整数型
.局部变量文件号, 整数型
.局部变量内容, 文本型
.局部变量文章总字数, 整数型
.局部变量循环次数, 整数型
总关键词＝分割文本 (编辑框关键词.内容, #换行符, )
总关键词数＝取数组成员数 (总关键词)
文章总字数＝到整数 (文章最大字数.内容) ÷ 4
文件号＝打开文件 (目录.内容, , )
循环次数＝到整数 (链接个数.内容) ＋ 1
内容＝编辑框文章.内容
.如果真 (编辑框文章.内容 ≠ “” 且编辑框关键词.内容 ≠ “”)
按钮生成.禁止＝真
按钮生成.标题＝ “处理中”
.判断循环首 (内容 ≠ “”)
.计次循环首 (循环次数, 计次)
.判断开始 (计次 ≠ 循环次数)
截取的文本＝取文本左边 (内容, 取随机数 (20, 文章总字数))
编辑框1.加入文本 (截取的文本＋ “ ” ＋总关键词 [取随机数 (1, 总关键词数)] ＋ “ ”)
.默认
截取的文本＝取文本左边 (内容, 取随机数 (20, 文章总字数))
编辑框1.加入文本 (截取的文本)
.判断结束
内容＝子文本替换 (内容, 截取的文本, “”, , 1, 假)
.计次循环尾 ()
移到文件尾 (文件号)
插入文本 (文件号, 编辑框1.内容＋ #换行符＋ #换行符)
编辑框1.内容＝ “”
.判断循环尾 ()
按钮生成.禁止＝假
按钮生成.标题＝ “文章生成”
关闭文件 (文件号)
状态条1.置文本 (0, “恭喜：文章生成成功！”)
返回 ()
.如果真结束
关闭文件 (文件号)
状态条1.置文本 (0, “文章或关键词不能为空，请修改！”)
延迟 (8000)
状态条1.置文本 (0, “欢迎使用！”)

复制代码

exit11 · 发表于 2011-5-26 11:27:47

.版本 2

      .计次循环首 (循环次数, 计次)
         截取数量＝取随机数 (20, 文章总字数)
         .如果真 (截取数量％ 2 ≠ 0)
            截取数量＝截取数量＋ 1
         .如果真结束

         .判断开始 (计次 ≠ 循环次数)
            截取的文本＝取文本左边 (到全角 (内容), 截取数量)
            编辑框1.加入文本 (到半角 (截取的文本) ＋ “ ” ＋总关键词 [取随机数 (1, 总关键词数)] ＋ “ ”)
         .默认
            截取的文本＝取文本左边 (到全角 (内容), 截取数量)
            编辑框1.加入文本 (到半角 (截取的文本))
         .判断结束
         内容＝子文本替换 (内容, 截取的文本, “”, , 1, 假)
      .计次循环尾 ()

exit11 · 发表于 2011-5-26 11:49:28

未测试。
出现乱码肯定是因为取汉字的时候，在截取文本的时候，只取到了一半

xiang5905 · 发表于 2011-5-26 21:15:36

你上面弄了个死循环。还有一个地方修改一下这答案就完整了。。。内容＝子文本替换 (到半角（内容）, 到半角（截取的文本）, “”, , 1, 假)

xiang5905 · 发表于 2011-5-26 21:16:10

灰常感谢！

四海铭洋 · 发表于 2011-5-27 12:48:15

新手路过，学习一下

老生常谈 · 发表于 2011-5-28 11:51:58

exit11 发表于 2011-5-26 11:49
未测试。
出现乱码肯定是因为取汉字的时候，在截取文本的时候，只取到了一半

好好学习

jk007666 · 发表于 2011-5-28 14:09:48

学习学习学习学习

yuan001 · 发表于 2013-2-14 20:30:57

不知道这个有什么用

		自动登录	找回密码
密码			注册

[已解决] 软件问题，请求懂的人帮我解决，很简单的

最佳答案

评分