如何获取尺寸标注中的文字角度

柱哥

图中有线性标注 对齐标注 半径标注 直径标注
如何求文字角度
线性标注 对齐标注 可以用组码 13 14 算出
15.4993  26.8513  可以算

线性  21.9264   半径  4.0935     直径 8.187
这三个文字角度怎么算 请有思路的出来说说，谢谢了。

自贡黄明儒

http://bbs.xdcad.net/thread-676666-1-1.html
可以取得包围盒，也包括转角了

菜卷鱼

把它炸了，取得角度之后再恢复

sutai

菜卷鱼 发表于 2015-1-10 10:55
把它炸了，取得角度之后再恢复

哈哈，我最近已用了2次如此神功了，好用~

鱼与熊掌

自贡黄明儒 发表于 2015-1-9 14:32
http://bbs.xdcad.net/thread-676666-1-1.html
可以取得包围盒，也包括转角了

黄工的包容盒准备引用去

柱哥

有相关的代码么，发一个，或给个链接看看。
谢谢上面的回答，我用炸开的方法，取得角度再还原，很好用！

菜鸟冒充老鸟A

小白不会操作，求代码

柱哥

        (command "undo""be")
        (command "explode" en)  ;炸开尺寸对象
        (setq ss (ssget "p"'((0 . "mtext")))) 　　
        (setq en1 (ssname ss 0))
        (setq pt10 (cdr (assoc 10 (entget en1))))
        (setq hd (cdr (assoc 50 (entget en1))))  ;文字角度
        (command "undo""e")
        (command "undo" 1)

fools

1. 
   
2. ;;尺寸文字角度
   
3. (DEFUN c:test1 (/ BLK BN E LST)
   
4.   (IF (SETQ e (CAR (ENTSEL "\n选择尺寸： ")))
   
5.     (PROGN (SETQ bn  (CDR (ASSOC 2 (ENTGET e)))
   
6.                  blk (TBLOBJNAME "block" bn)
   
7.            )
   
8.            (WHILE (/= (CDR (ASSOC 0 (SETQ lst (ENTGET (SETQ blk (ENTNEXT blk)))))) "MTEXT"))
   
9.            (PRINC (/ (* 180. (CDR (ASSOC 50 (ENTGET blk)))) PI))
   
10.     )
    
11.   )
    
12.   (PRINC)
    
13. )
    

复制代码

菜鸟冒充老鸟A

都是大神啊