myqzq
发表于 2013-4-27 20:22:08
感谢呀,我也沾光了。呵呵,挺实用的。可惜9楼的下载不了,不知道是什么原因
wangxf888
发表于 2015-1-19 17:45:17
留个记号 学习学习
shikey
发表于 2015-1-20 15:24:07
不错不错
浪子_无限
发表于 2015-6-14 09:23:13
7楼9楼,厉害。
《真水无香》
发表于 2016-3-31 11:24:22
都是高手,学习了
wsl5953
发表于 2019-10-18 12:22:42
很好,下载看看
00放飞梦想00
发表于 2020-3-25 12:39:37
如果能解决线段变长的原因就好了,顶顶顶
00放飞梦想00
发表于 2020-3-25 12:41:31
如果能解决线段变长的原因就好了,顶顶顶
00放飞梦想00
发表于 2020-3-25 12:42:53
userzhl 发表于 2011-6-20 20:33
是不是这样的效果?
这个看起来不错哦,分享源码哈,顶顶顶
00放飞梦想00
发表于 2020-3-25 13:03:10
198526 发表于 2011-6-20 19:22
粗略的写了下
(defun c:tt ()
(setq PL1 (entsel "\n请选取第一条直线:")
如果能在范围内等分就好了