【源码】框选直线动态拉伸

荒野孤行

各位，编写了一个关于批量选择直线，然后动态拉长或缩短直线的程序。图2是用CAD里面的命令LENGTHEN对单条直线执行的效果。

附上附件源码：

myhobby76

JUST LEARNING'S NICE CODE

疯球

谢谢楼主的分享

纵横八方

楼主 这个挺好

edata

你可以研究下这个
框选直线动态拉伸edata版本
http://bbs.mjtd.com/forum.php?mo ... &fromuid=338795

荒野孤行

edata 发表于 2014-1-1 01:32
你可以研究下这个
框选直线动态拉伸edata版本
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=108877 ...

看了下回复时间，你写程序写到那么晚呃。
你是专业开发程序的么？

edata

荒野孤行 发表于 2014-1-1 09:38
看了下回复时间，你写程序写到那么晚呃。
你是专业开发程序的么？

不是的，只是兴趣，大冷天的，还没空调，写完调试好，才发现很晚了。。。

mikewolf2k

lisp不懂，只是从编程的角度考虑。
问题的难点应该在于如何判断是延伸那一边。对于普通的线段，可以根据原来端点1和最终端点1与原来端点2的相对位置来判断是伸长还是缩短以及长度和方向，但是对于垂直或者水平（取决于你是如何判断方向位置的），如何确定是延伸哪个点？毕竟在这种情况下，两个点都是一样的，如果需要用户去手工选择，也就失去了批量的意义了。
建议楼主先考虑上面的极限情况，找出一个能适用所有情况的算法。

混沌初开

可以自定义长度吗？

荒野孤行

混沌初开 发表于 2014-1-3 19:19
可以自定义长度吗？

不可以，是通过鼠标当前位置点做与直线的垂直线，交点即直线伸缩的位置

荒野孤行

edata 发表于 2014-1-1 10:23
不是的，只是兴趣，大冷天的，还没空调，写完调试好，才发现很晚了。。。

看下我写的效果，是否有不同？

edata

荒野孤行 发表于 2014-1-4 10:52
看下我写的效果，是否有不同？

和我最初的想法有些像，因为时间关系，所以只写了框选直线，
目前和我的程序差异
1，选择方式，我是框选，通过框选内判断拉伸点。而你采用(ssget)普通方式，更灵活。比如直线重叠，很好用。
2，因为我锁定了拉伸点，简单模拟的lengthen命令的dy效果，所以拉伸点的时候很好控制。而你采用判断grread拖动点与起点、终点距离来判定拉伸点，方式灵活，但是bug是改变拉伸点的时候没有恢复原来的起点终点，而导致原来起点或终点会改变，以前我也回复个类似的帖。
3，因为模拟lengthen，所以我的右键是放弃，空格、回车确定
4，grdraw 连线的点 不一样。
  程序是拿来用的，能适合自己用才是好程序。

荒野孤行

edata 发表于 2014-1-4 12:35
和我最初的想法有些像，因为时间关系，所以只写了框选直线，
目前和我的程序差异
1，选择方式，我是框选 ...

是的，如果按esc键则应该恢复到之前，这个我没想出来怎么写，只能通过用户后退操作来返回了。