[求助]：如何获得尺寸中文字的位置和转角

shisj · 发表于 2004-9-1 12:34:43

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

在弧长标注中，我没有办法实现弧长标志（圆弧线），因此想干脆画一个弧线，但是如何获得尺寸中文字起点（或者中点）的位置，文字长度，文字的倾斜角度，求助各位了，如果能实现将弧线集成到尺寸中，那就更好了。

lsjjm · 发表于 2004-9-1 15:49:32

关于弧长标注论坛有许多贴子, 搜索一下.
简单的就是LIST查看弧长,角度标注这个圆弧, 再用弧长替代角度值.

shisj · 发表于 2004-9-2 10:59:45

不是计算弧长，是画那个弧长标志，就是在文字上加一个圆弧线标志，该如何加。

aidraft · 发表于 2004-9-2 11:57:16

(defun C:test(/ ent bkname bkref en en_text)
  (setq ent (entget (car (entsel "\nSelect a dimension: "))))
  (setq bkname (cdr (assoc 2 ent)))
  (setq bkdef (tblsearch "BLOCK" bkname))
  (setq en (cdr (assoc -2 bkdef)))
  (while (entnext en)
(if (= (cdr (assoc 0 (entget en))) "MTEXT")
   (setq en_text en))
(setq en (entnext en))
  )
  (if en_text
(setq pt (cdr (assoc 10 (entget en_text)))
      ang (cdr (assoc 50 (entget en_text)))
)
  )
)

shisj · 发表于 2004-9-2 16:02:07

谢谢aidraft了，程序好用，获得了尺寸文字的基准位置和角度，谢谢了

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

[求助] [求助]：如何获得尺寸中文字的位置和转角

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

浏览过的版块