文本_随机插入字符到某位置的兼容性问题

我叫林舒书

昨天发错版块了  今天重发次。。

原版无法兼容   类似这样的插入    就是a不v兼b容我啊

修改了一下


[e]

.版本 2

.子程序 文本_插入文本到某位置, 文本型, 公开, 插入某文本到左起某一位置，原文本后移，返回插入后的文本。
.参数 原文本, 文本型
.参数 欲插入的文本, 文本型
.参数 位置, 整数型
.局部变量 临时文本, 文本型, , "0"
.局部变量 起始文本, 文本型
.局部变量 i, 整数型

文本_逐字分割 (原文本, 临时文本)
插入成员 (临时文本, 位置, 欲插入的文本)
.计次循环首 (取数组成员数 (临时文本), i)
起始文本 ＝ 起始文本 ＋ 临时文本 <i>
.计次循环尾 ()
返回 (起始文本)


[/e]

我叫林舒书

御风软件 发表于 2014-1-20 20:23
我已经重写这个子程序，感谢你的反馈
[e]
.版本 2

学习了

御风软件

我已经重写这个子程序，感谢你的反馈
[e]
.版本 2

.子程序 文本_插入文本到某位置, 文本型, 公开, 插入某文本到左起某一位置，原文本后移，返回插入后的文本。
.参数 原文本, 文本型
.参数 欲插入的文本, 文本型
.参数 位置, 整数型, , 位置必须为偶数值（字母、数字、标点、符号都和汉字均占2长度)

返回 (到半角 (文本替换 (到全角 (原文本), 插入位置 － 1, 0, 到全角 (欲插入的文本))))
[/e]

御风软件

已经在家了，源码什么的还在快盘，还没有同步回来，到时候看看，感谢你的反馈