关于闭合pline的坐标标注

xiaomihu 发表于 2005-12-1 10:19:00

，如图，关键是要将坐标都要标在这个闭合的pline线的外面，请问各位高手如何实现呢，我的思路是选择pline线，获得所有关键点的坐标，再逐一标注，就是如何能都标在外面搞不明白

sieben 发表于 2005-12-1 10:35:00

1,笨办法是向外偏出一个PLine,然后使用其节点
2,先判断PLINE的走向,是顺时还是逆时,然后决定对节点的角度增减一个常量可得到PLINE外的一个点

ZZXXQQ 发表于 2005-12-2 22:30:00

为什么不先搜索一下？到这里看看：
<A href="http://bbs.mjtd.com/forum.php?mod=viewthread&tid=42491" target="_blank" >http://bbs.mjtd.com/forum.php?mod=viewthread&tid=42491</A>

小顽童 发表于 2005-12-2 22:32:00

呵~~面积比较是最简单的

nescafe 发表于 2005-12-10 23:21:00

这位朋友你试试这个程序。不知能不能把你如何获得关键点坐标的代码发给我一份。希望能互相交流一下  邮箱地址 <A href="mailto:nescafe1023@yahoo.com.cn" target="_blank" >nescafe1023@yahoo.com.cn</A>                 (setvar "cmdecho" 0) (setvar "dimtxt" 2) (setvar "osmode" 33) (setq a (getpoint "\n请选择基点:")) (setq x (strcat "y:" (rtos (car a) 2 2))) (setq y (strcat "x:" (rtos (cadr a) 2 2))) (setq xz (getint "\n 1:显示坐标 2:标注坐标")) (if (= 1 xz)   (alert (strcat y "\n" x))   (progn     (setq chklay (tblsearch "layer" "zb"))     (if (= chklay nil)       (command "-layer" "n" "zb" "s" "zb" "")       (command "-layer" "s" "zb" "")     )     (command "qleader" a (getpoint) "" 10 y x "")   ) ) (setvar "osmode" 2301) (prin1)

王咣生 发表于 2005-12-11 11:54:00

例子:

nescafe 发表于 2005-12-11 21:55:00

谢谢，希望你对以上源码提出改进意见

zhong5 发表于 2006-1-1 03:16:00

试试这个程序吧，绝对让你满意
<A href="http://bbs.mjtd.com/forum.php?mod=viewthread&tid=46092" target="_blank" >http://bbs.mjtd.com/forum.php?mod=viewthread&tid=46092</A>

tuteng7 发表于 2020-1-1 14:18:05

顶顶顶强

页: [1]

明经CAD社区's Archiver

关于闭合pline的坐标标注