求把一串文字中的空格替换为逗号，把乘号x替换为*

664571221

bluefcc1 发表于 2018-7-9 16:09
(defun c:ss( / ss osmode i name ent size size_new size_all bak_cecolor)
   (setvar "cmdecho" 0)
   ...

大神你好，生成的字符串两边的括号没有复制到粘贴板

llsheng_73

--字符串随意替换--特点:灵活,快速,高效,省事,容错(根据增强型字符串分割写的)
http://bbs.mjtd.com/forum.php?mo ... &fromuid=202795
(出处: 明经CAD社区)

多对多替换(需要 a ,b为长度相同的两个表,表内元素全部为字符串)
(Superstrsubst"所有a中指定的的字符串都会替换为b中所指定的字符串" '("字""串")'("A""B"))
"所有a中指定的的A符B都会替换为b中所指定的A符B"

bluefcc1

664571221 发表于 2018-7-17 15:12
大神你好，生成的字符串两边的括号没有复制到粘贴板

請將
       (setq bak_cecolor(getvar 'cecolor))
       (set-clip-string size_all)           ;複製到剪貼簿(不含括號)
       (setvar 'cecolor "1")
       (setq size_all(strcat "(" size_all ")"))
修改成
       (setq bak_cecolor(getvar 'cecolor))
       (setvar 'cecolor "1")
       (setq size_all(strcat "(" size_all ")"))
       (set-clip-string size_all)           ;複製到剪貼簿

664571221

bluefcc1 发表于 2018-7-9 14:17

你好大侠，这个怎么改成框选

852456

看帖回帖是美德