灬北方狼灬 发表于 2023-1-8 17:57:52

冷门实用小工具【全图删除0值标注】

本帖最后由 灬北方狼灬 于 2023-1-8 17:59 编辑

简单功能不多说直接上图吧。




源码：
;;全图删除值<= 0 的标注. By:ypeng 2023年1月8日
(defun c:d0 (/ ent)
(if (/= (SETQent (SSGET "x"
         '((0 . "DIMENSION")
         (-4 . "<=")
         (42 . 1)
          )))
    nil)
    (progn (command "ERASE" ent "")
   (princ "为 “0” 标注已清空。")
    )
    (princ "未检测到为 “0” 标注。")
)
(princ)
)

尘缘一生 发表于 2023-1-10 00:33:02

这个最好，在标注时候，就整合函数去掉了，不要画完再处理

请看三领的。。。
1：直接整合删除0尺寸
2：直接整合删除重复实体，合并单线同轴一根！
3：直接整合，判定图纸，是否炸开尺寸
4：直接可以跟随鼠标，完美，定位位置


灬北方狼灬 发表于 2023-1-10 10:34:25

尘缘一生 发表于 2023-1-10 00:33
这个最好，在标注时候，就整合函数去掉了，不要画完再处理

请看三领的。。。


是的，前辈这个是多功能组合，我这个是因为收到别人的图有这种空值标注所以功能上会比较单一，主要还是看使用场景吧:lol。感谢提出的宝贵思路:handshake

海盗曹 发表于 2023-1-9 10:54:45

学习下写法

ynhh 发表于 2023-1-9 11:02:05

简单实用
好好好

liuhe 发表于 2023-1-9 12:57:22

这个有意思，配合qdim ，估计很好用

飞的鱼儿 发表于 2023-1-9 13:28:32

还真没想到要写一个这样的东西，实用方便。

tomonkey239 发表于 2023-1-9 16:28:29

点赞点赞点赞

中国梦 发表于 2023-1-9 19:59:03

谢谢楼主分享

KO你 发表于 2023-1-9 21:30:25

很实用，帮楼主顶一下
页: [1] 2
查看完整版本: 冷门实用小工具【全图删除0值标注】