如何修改文本固定内容？

liu2000

昨天没表达清楚抱歉了，因为当时我也没说清需求



CREATE TOOL ; TAPERSPHERICAL FORM TOOL
RENAME TOOL "1" "刀具名称"
EDIT TOOL "刀具名称" LENGTH "刀具长度"
EDIT TOOL "刀具名称" TIPRADIUS "刀尖半径"
EDIT TOOL "刀具名称" DIAMETER "刀具直径"
EDIT TOOL "刀具名称" TAPERANGLE "刀具锥角"
EDIT TOOL "刀具名称" SHANK_COMPONENT ADD
EDIT TOOL "刀具名称" HOLDER_COMPONENT ADD
EDIT TOOL "刀具名称" HOLDER_COMPONENT UPPERDIA "50"
EDIT TOOL "刀具名称" HOLDER_COMPONENT LOWERDIA "50"
EDIT TOOL "刀具名称" HOLDER_COMPONENT LENGTH "50"
EDIT TOOL "刀具名称" HOLDER_COMPONENT ADD
EDIT TOOL "刀具名称" HOLDER_COMPONENT UPPERDIA "130"
EDIT TOOL "刀具名称" HOLDER_COMPONENT LOWERDIA "130"
EDIT TOOL "刀具名称" HOLDER_COMPONENT LENGTH "130"
EDIT TOOL "刀具名称" OVERHANG "刀具伸出"
TOOL ACCEPT

文本的编码格式为ANSI的

标签后边是对应的编辑框

刀具名称对应的编辑框里输入内容，替换文本里的（刀具名称）为编辑框里的内容

刀具长度对应的编辑框里输入内容，替换文本里的（刀尖半径）为编辑框里的内容

比如刀具长度对应的编辑框里写的100那么文本里把刀具长度改为100保存

以此类推都是这样修改，相当于用编辑框里的内容去替换文本里用红框框选的参数

说白了就是想省点事不用去文本里挨个去替换想要的内容了，嘿嘿

大佬们，这个要怎么实现呢？

是可可吖

例子.e (1.15 MB, 下载次数: 2)

前天 11:20 上传

点击文件名下载附件

6.txt (735 Bytes, 下载次数: 1)

前天 11:20 上传

点击文件名下载附件

* Windows 11
* “CREATE TOOL ; TAPERSPHERICAL FORM TOOL
RENAME TOOL "1" "小刀刀"
EDIT TOOL "小刀刀" LENGTH "30"
EDIT TOOL "小刀刀" TIPRADIUS "10"
EDIT TOOL "小刀刀" DIAMETER "25"
EDIT TOOL "小刀刀" TAPERANGLE "2"
EDIT TOOL "小刀刀" SHANK_COMPONENT ADD
EDIT TOOL "小刀刀" HOLDER_COMPONENT ADD
EDIT TOOL "小刀刀" HOLDER_COMPONENT UPPERDIA "50"
EDIT TOOL "小刀刀" HOLDER_COMPONENT LOWERDIA "50"
EDIT TOOL "小刀刀" HOLDER_COMPONENT LENGTH "50"
EDIT TOOL "小刀刀" HOLDER_COMPONENT ADD
EDIT TOOL "小刀刀" HOLDER_COMPONENT UPPERDIA "130"
EDIT TOOL "小刀刀" HOLDER_COMPONENT LOWERDIA "130"
EDIT TOOL "小刀刀" HOLDER_COMPONENT LENGTH "130"
EDIT TOOL "小刀刀" OVERHANG "5"
TOOL ACCEPT”
被调试易程序运行完毕


好了

蛀牙

  

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

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型

a ＝ 到文本 (读入文件 (取特定目录 (3) ＋ “新建文本文档.txt”))
a ＝ 子文本替换 (a, “刀具名称”, 编辑框1.内容, , , 真)
a ＝ 子文本替换 (a, “刀具长度”, 编辑框5.内容, , , 真)
a ＝ 子文本替换 (a, “刀尖半径”, 编辑框3.内容, , , 真)
a ＝ 子文本替换 (a, “刀具直径”, 编辑框2.内容, , , 真)
a ＝ 子文本替换 (a, “刀具锥角”, 编辑框4.内容, , , 真)
a ＝ 子文本替换 (a, “刀具伸出”, 编辑框6.内容, , , 真)
写到文件 (取特定目录 (3) ＋ “新建文本文档.txt”, 到字节集 (a))

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

.版本 2<br /> .支持库 shell<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> <br /> a ＝ 到文本 (读入文件 (取特定目录 (3) ＋ “新建文本文档.txt”))<br /> a ＝ 子文本替换 (a, “刀具名称”, 编辑框1.内容, , , 真)<br /> a ＝ 子文本替换 (a, “刀具长度”, 编辑框5.内容, , , 真)<br /> a ＝ 子文本替换 (a, “刀尖半径”, 编辑框3.内容, , , 真)<br /> a ＝ 子文本替换 (a, “刀具直径”, 编辑框2.内容, , , 真)<br /> a ＝ 子文本替换 (a, “刀具锥角”, 编辑框4.内容, , , 真)<br /> a ＝ 子文本替换 (a, “刀具伸出”, 编辑框6.内容, , , 真)<br /> 写到文件 (取特定目录 (3) ＋ “新建文本文档.txt”, 到字节集 (a))

liu2000

蛀牙 发表于 2025-3-24 10:56
[e=1].版本 2
.支持库 shell

大佬，没反应

补充内容 (2025-3-24 11:05):
替换不了

鱼老板

例子 1.e (1.08 MB, 下载次数: 1)

前天 11:22 上传

点击文件名下载附件