pizi158545086 发表于 2021-11-17 15:02:42

求助，现在源码可以偏移且连接成闭合线，我想要增加偏移后对角连线这个功能

本帖最后由 pizi158545086 于 2021-11-17 15:06 编辑

求助，现在源码可以偏移且连接成闭合线（图片中的①），我想要增加偏移后对角连线这个功能，如图片中的②所示，有没有大神可以帮下忙

start4444 发表于 2021-11-17 15:02:43

本帖最后由 start4444 于 2021-11-17 15:56 编辑

试试看

pizi158545086 发表于 2021-11-17 16:05:58

start4444 发表于 2021-11-17 15:53
试试看
感谢和我想要的一样可以顺便帮我把节点相连的线改为8号颜色吗

start4444 发表于 2021-11-17 16:18:42

pizi158545086 发表于 2021-11-17 16:05
感谢和我想要的一样可以顺便帮我把节点相连的线改为8号颜色吗

(if (> (length ptlst) 2) (progn (setq ptlst (cdr (reverse (cdr (reverse ptlst)))) ptlst1 (cdr (reverse (cdr (reverse ptlst1))))) (mapcar'(lambda (x y)         (entmake (list '(0 . "LINE") (cons 10 x) (cons 11 y) (cons 62 8)))) ptlst ptlst1)))
换这句

pizi158545086 发表于 2021-11-17 16:23:16

start4444 发表于 2021-11-17 16:18
(if (> (length ptlst) 2) (progn (setq ptlst (cdr (reverse (cdr (reverse ptlst)))) ptlst1 (cdr (rev ...

可以了，非常感谢

hhh454 发表于 2021-11-19 04:57:49

感觉是在画户型门框

bai2000 发表于 2021-11-19 09:18:56

好像矩形时，有一个角有问题

stonedesign 发表于 2021-11-20 22:31:49

矩形有个角有问题大师能改下吗

bai2000 发表于 2022-5-17 08:26:27

定上去，大师修复一下

xj6019 发表于 2022-5-17 11:18:58

简单玩一下，纯属娱乐
页: [1] 2
查看完整版本: 求助，现在源码可以偏移且连接成闭合线，我想要增加偏移后对角连线这个功能