8楼已经解释得很清楚了，CAD本身自带的拉伸命令STRETCH已经能满足你的要求，为何还要继续编程呢。
<p>只适用一两根简单的线条，可选对象范围太窄了，很难适应实际工程应用。</p><p>程序的初衷是这样的：随便选取一些对象移动，其它端点在其上面线条的都跟着自动调整，免除多余的剪切延伸。</p>
<p>搜一下,明总写的,标注尺寸驱动程式,参考参考,里面就有用到STRETCH...,要改成你想要的就是了.</p>
<p>好像mmmm在xdcad贴过一个程序，跟你的要求比较相近</p><p>ni </p>
T-bag发表于2008-3-1 16:20:00static/image/common/back.gif我看了半天S命令都可以实现你的要求啊，S一选，把不要拉伸的剔掉不就完事了。
<p></p>我看也是只要拉伸命令就可以解决问题，除非它是你程序的一部分否则讨论没价值
偶对十楼的很失望，明明用S命令就可以完成了，干嘛搞的那么复杂呀，是不是没事做呀
wanhongron发表于2008-3-3 8:30:00static/image/common/back.gif本来我对明经寄了很大希望，但是我觉得这个程序对真正的高手应该不算非常难，为什么那么多人看了都没有留言？
<p><font color="#ff00ff">1.这里是学习的好地方，一味地索取别人嚼好的馒头，是没有味道的。</font></p><p><font color="#ff00ff">2.过分的要求不能被满足，连续发牢骚更是不足取的。</font></p><p><font color="#ff00ff">3.其实，这是个图形参数化+尺寸拖动的问题。专业对象的程序设计，只能在具有专业设计能力的前提下，去开发。</font></p>
<p>明明一个S就可以搞定还搞哪么多，有必要吗！！</p>
小图的话用s就行了。选的时候注意鼠标取点的顺序。
<p><strong><font face="Verdana" color="#61b713">T-bag说的对：</font></strong>我看了半天S命令都可以实现你的要求啊，S一选，把不要拉伸的剔掉不就完事了。</p><p>楼主难道不会用strecth命令吗？？那么简单的命令啊</p>