代码中包含标注命令，如何显示标注动态调整的过程？

海贼凌源

P1是选择标注的起点，P2是选择标注的终点3，P3是标注线的定位。请问如何使P1，P2画出的标注显示出来，然后再由P3来定位？

2. (defun c:da2()
   
3.   (setq p1 (getpoint))
   
4.   (setq p2 (getpoint p1))
   
5.   (setq p3 (getpoint p2))
   
6.   (while p2
   
7.     (command "DIMALIGNED" p1 p2 p3)
   
8.     (setq p2 (getpoint p1))
   
9.     (setq p3 (getpoint p2))
   
10.     )
    
11.   
    
12.   (princ)
    

(defun c:da2()<br />   (setq p1 (getpoint))<br />   (setq p2 (getpoint p1))<br />   (setq p3 (getpoint p2))<br />   (while p2<br />     (command "DIMALIGNED" p1 p2 p3)<br />     (setq p2 (getpoint p1))<br />     (setq p3 (getpoint p2))<br />     )<br />   <br />   (princ)<br />

ivde

2. 
   
3. (defun c:tt (/  p1 p2)
   
4.   (while (and
   
5.               (setq p1 (getpoint "\nFirst Point: "))
   
6.               (setq p2 (getpoint p1 "\nSecond Point: "))
   
7.          )
   
8.     (command ".dimaligned" p1 p2)
   
9.     (if        (/= (getvar "cmdacitve") 0)
   
10.       (command pause)
    
11.       (command)
    
12.     )
    
13.   )
    
14.   (princ)
    
15. )

<br /> (defun c:tt (/  p1 p2)<br />   (while (and <br />               (setq p1 (getpoint "\nFirst Point: "))<br />               (setq p2 (getpoint p1 "\nSecond Point: "))<br />          )<br />     (command ".dimaligned" p1 p2)<br />     (if        (/= (getvar "cmdacitve") 0)<br />       (command pause)<br />       (command)<br />     )<br />   )<br />   (princ)<br /> )

海贼凌源

ivde 发表于 2016-2-20 16:28

请问，这里是哪段语句控制了标注线的显示呢？我想在很多场合用到标注显示。在我原本的代码上试了一下还是没有这个效果。

海贼凌源

求大神指导。。。

海贼凌源

求大神解答