关于line、pline、arc的批量标注程序

wuxjld · 发表于 2005-12-30 11:41

哪位有line、pline、arc的批量标注程序，即一次标注当前图形所有line、pline、arc的长度？另外有批量删除的程序吗(选择一个对象，删除删除当前图形的所有同类对象)？

wuxjld · 发表于 2006-1-4 10:10

line、pline、arc的批量标注程序应该是比较通用的，哪位曾经做过？请版本帮忙！谢谢！

maomao2004 · 发表于 2006-1-4 16:32

(defun c:eraseall()
(setq ent (entget (car (entsel "select the entity you want:"))))
(setq lis (assoc 0 ent))
(setq data (cdr lis))
(setq morent (ssget "x" (list (cons 0 data))))
(command "erase" morent "")
(princ)
)

;;随便写了个简单的删除所有同类函数，不够全面，请搂住自己再添点判断吧，呵呵

maomao2004 · 发表于 2006-1-4 16:56

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=46092

这里面有你要的标注的程序

wuxjld · 发表于 2006-1-5 19:43

问题的关键在于对象长度的标注点的确定(这与标注文字的高度、对象的斜率有关)，哪位能帮忙给出标注在对象中间的算法？谢谢！

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