快速选择相同文本or快速选择文本图元

qiwuliao · 发表于 2023-4-12 08:13

自己试试，第一次发帖，不会搞动图。
(defun C:T1()
(sssetfirst nil (ssget (list (CONS 1 (cdr(assoc 1 (entget(car(entsel"选择对象")))))))))
)
(defun C:T2()
(sssetfirst nil (ssget (list (CONS 0 "*TEXT"))))
)

飞雪神光 · 发表于 2023-4-12 08:28

这种代码属实没有必要发上来了啊！

bloodtempt · 发表于 2023-4-12 08:29

飞雪神光发表于 2023-4-12 08:28
这种代码属实没有必要发上来了啊！

不能这么说鼓励新手才对

aws · 发表于 2023-4-12 08:33

套了这么多层。。。

liuhe · 发表于 2023-4-12 09:06

建议用find命令，贼好用

cghdy · 发表于 2023-4-12 09:47

书上不鼓励这么写

e2002 · 发表于 2023-4-12 09:49

如上面 aws 的回复：“套了这么多层。。。”

个人觉得有必要说说coding的一般规范，代码不是非要弄到很少就是高妙，绝大多数的实际编程工作状态下，代码的简洁、逻辑、层次、便于理解/查错/改进才是我们要遵循的原则。

不多不少准确的定义内部变量、赋值、内部函数、返回值、错误捕捉与处理等才是健康优质代码的基础。

liuhe · 发表于 2023-4-12 10:14

e2002 发表于 2023-4-12 09:49
如上面 aws 的回复：“套了这么多层。。。”

个人觉得有必要说说coding的一般规范，代码不是非要弄到很 ...

主要是entsel 如过是空，bug立马出来了。需要判断entsel的结果

qiwuliao · 发表于 2023-4-12 11:22

liuhe 发表于 2023-4-12 09:06
建议用find命令，贼好用

find在浩辰CAD里面速度不给力，中望倒是挺快，但是常用浩辰比较多，所以才用这个代码

菜鸟初来乍到 · 发表于 2023-4-13 08:02

明经因你们而精彩

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

快速选择相同文本or快速选择文本图元

评分