动态引线标注源码(升级 V2.0，可设置参数)

★胜/tp驮

这个 很好 ，我经常用，平时都是 手工直接画，我自己不会编程，我还是建议加个参考线......

fangmin723

厉害，不为大神，学习了！！！！被里面的功能震撼到了！

508000096

如果能在横线的上面和下面都能标注文字就更好了。

wx302008008

谢谢楼主，可以节约很多时间了

fanpaulm

楼主都是精品啊

liwen888888

感谢分享源码！！

chenjieq1990

楼主，很认真学习了你的代码，学到了很多，但是有几个地方不太明白，希望指教一下，

2. (= code 5)       ; 鼠标移动
   
3.                        (if (= (getvar "ORTHOMODE") 1)
   
4.                          (progn
   
5.                            (setq x0 (car ptlast)
   
6.                                  y0 (cadr ptlast)
   
7.                                  x1 (car data)
   
8.                                  y1 (cadr data)
   
9.                            )
   
10.                            (if (< (abs (- x0 x1)) (* 1.5 bi (nth 0 lstsz)))
    
11.                              (setq pt (list x0 y1))
    
12.                              (if (< (abs (- y0 y1)) (* 2 bi (nth 0 lstsz)))
    
13.                                (setq pt (list x1 y0))
    
14.                                (setq pt data)
    
15.                              )
    
16.                            )
    
17.                          )
    
18.                          (setq pt data)
    
19.                        )

(= code 5)       ; 鼠标移动<br />                        (if (= (getvar "ORTHOMODE") 1)<br />                          (progn<br />                            (setq x0 (car ptlast)<br />                                  y0 (cadr ptlast)<br />                                  x1 (car data)<br />                                  y1 (cadr data)<br />                            )<br />                            (if (< (abs (- x0 x1)) (* 1.5 bi (nth 0 lstsz)))<br />                              (setq pt (list x0 y1))<br />                              (if (< (abs (- y0 y1)) (* 2 bi (nth 0 lstsz)))<br />                                (setq pt (list x1 y0))<br />                                (setq pt data)<br />                              )<br />                            )<br />                          )<br />                          (setq pt data)<br />                        )

这部分判断正交的目的是做什么？

至野异族

正需要这个东西呢

langjs

chenjieq1990 发表于 2017-9-6 07:55
楼主，很认真学习了你的代码，学到了很多，但是有几个地方不太明白，希望指教一下，

正交的目的是有自动对齐的功能，比如画第二个自动和第一个对齐，有点类似于捕捉的效果

那年杏花微雨

能不能 选择我想移动的文字然后加引线呢