简易文本转化工具 - 精易论坛

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口

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

子程序名	返回值类型	公开	备注
_编辑框1_内容被改变

判断 (单选框1.选中＝真)

编辑框2.内容＝内码转换 (编辑框1.内容, 4)

返回 ()

判断 (单选框2.选中＝真)

编辑框2.内容＝内码转换 (编辑框1.内容, 3)

返回 ()

判断 (单选框4.选中＝真)

' 编辑框2.内容＝数值到金额 (到数值 (编辑框1.内容), 假)

编辑框2.内容＝数值到大写 (到数值 (编辑框1.内容), 假)

返回 ()

判断 (单选框1.选中＝假且单选框2.选中＝假且单选框3.选中＝假且单选框4.选中＝假)

编辑框2.内容＝编辑框1.内容

返回 ()

判断 (单选框3.选中＝真)

编辑框2.内容＝ “”

汉字转化拼音 (编辑框1, 编辑框2)

返回 ()

子程序名	返回值类型	公开	备注
汉字转化拼音
参数名	类型	参考	可空	数组	备注
参数_汉字输入	编辑框
参数_拼音输出	编辑框

变量名	类型	静态	数组	备注
局部_计次	整数型

计次循环首 (取文本长度 (参数_汉字输入.内容) ÷ 2, 局部_计次)

参数_拼音输出.加入文本 (取拼音 (取文本中间 (参数_汉字输入.内容, 局部_计次 × 2 － 1, 2), 1) ＋ “ ”)

计次循环尾 ()

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

如果 (编辑框2.内容＝ “”)

通用对话框1.类型＝ 0

通用对话框1.打开 ()

编辑框2.内容＝读入文本 (打开文件 (通用对话框1.文件名, 1, ), )

通用对话框1.类型＝ 1

通用对话框1.打开 ()

写到文件 (通用对话框1.文件名, 到字节集 (编辑框2.内容))

i支持库列表	支持库注释
cncnv	文字编码转换支持库

.版本 2<br />
.支持库 cncnv<br />
<br />
.程序集 窗口程序集_启动窗口<br />
<br />
.子程序 __启动窗口_创建完毕<br />
<br />
<br />
<br />
.子程序 _编辑框1_内容被改变<br />
<br />
<br />
.判断开始 (单选框1.选中 ＝ 真)<br />
    编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 4)<br />
    返回 ()<br />
.判断 (单选框2.选中 ＝ 真)<br />
    编辑框2.内容 ＝ 内码转换 (编辑框1.内容, 3)<br />
    返回 ()<br />
.判断 (单选框4.选中 ＝ 真)<br />
    ' 编辑框2.内容 ＝ 数值到金额 (到数值 (编辑框1.内容), 假)<br />
    编辑框2.内容 ＝ 数值到大写 (到数值 (编辑框1.内容), 假)<br />
    返回 ()<br />
.判断 (单选框1.选中 ＝ 假 且 单选框2.选中 ＝ 假 且 单选框3.选中 ＝ 假 且 单选框4.选中 ＝ 假)<br />
    编辑框2.内容 ＝ 编辑框1.内容<br />
    返回 ()<br />
.判断 (单选框3.选中 ＝ 真)<br />
    编辑框2.内容 ＝ “”<br />
    汉字转化拼音 (编辑框1, 编辑框2)<br />
    返回 ()<br />
.默认<br />
<br />
.判断结束<br />
<br />
<br />
.子程序 汉字转化拼音<br />
.参数 参数_汉字输入, 编辑框<br />
.参数 参数_拼音输出, 编辑框<br />
.局部变量 局部_计次, 整数型<br />
<br />
.计次循环首 (取文本长度 (参数_汉字输入.内容) ÷ 2, 局部_计次)<br />
    参数_拼音输出.加入文本 (取拼音 (取文本中间 (参数_汉字输入.内容, 局部_计次 × 2 － 1, 2), 1) ＋ “ ”)<br />
.计次循环尾 ()<br />
<br />
.子程序 _按钮1_被单击<br />
<br />
.如果 (编辑框2.内容 ＝ “”)<br />
    通用对话框1.类型 ＝ 0<br />
    通用对话框1.打开 ()<br />
    编辑框2.内容 ＝ 读入文本 (打开文件 (通用对话框1.文件名, 1, ), )<br />
<br />
.否则<br />
    通用对话框1.类型 ＝ 1<br />
    通用对话框1.打开 ()<br />
    写到文件 (通用对话框1.文件名, 到字节集 (编辑框2.内容))<br />
<br />
.如果结束