属性图形的拉伸

情景

VCAD在程序生成图形时，将数据存在图形中，需要做明细表的时候，再调用出来。这样画完图纸，明细就能自动出来了。

与明细表相关的程序有很多，很多朋友都用的非常熟练了。

但是我们对于便利的追求是永无止境的，我们不妨想想遇到如下的情况如何处理：

根据设计条件，设备的直径是2000mm，长度是3000mm。按照条件，用VCAD将图纸画完了，明细都在图中，点选即可。

突然接到噩耗，筒体长度变为4000mm。

此时你会怎么办？

方法A. 修改图纸上修改尺寸，明细修改重量，交图。

方法B. 用拉伸命令，1:1修改图纸，自己算明细，交图。

方法C. 将原来画的筒体删除，重新用VCAD画个4000mm的筒体，自动算明细。

选择第A种方法的，说明工作很马虎的，耍小聪明，喜欢给自己和他人挖坑。

选择第B种方法的，对拉伸命令很熟悉，CAD用的熟悉。

选择第C种方法的，一定是VCAD的忠实用户。

方法比较

比较BC方法，并不说明C方法比B方法快，或者直观。这样我这样有自我修养的VCAD人感到尴尬，用程序竟然没有用Autocad自带那么方便。

我要这铁棒（VCAD）有何用？

那么有没有第四种方法，比ABC都要优越呢？

从操作习惯上来说，B方法是最符合直觉的。

可不可以从拉伸命令中，将筒体上带的附属数据根据拉伸长度更新一下，这样既用了方便的拉伸命令，又可以自动生成明细。在B的基础上，少了自己算明细表这一步。

程序思路

考虑了整个过程，初步程序构思如下：

1. 建立选择集SS

2. 将选择集SS中所有线段的长度读取到length1ist1

3. 用CAD的拉伸命令Stretch将选择集SS拉伸

4. 再次将选择集所有线段长度读取到lengthlist2

5. 比较lengthlist1和lengthlist2,获得被拉伸的线的编号。

6. 被拉伸的线，如果附属数据是“筒体”或“接管”，就自动更新附属数据。

古人云：

Talk is cheap, show me the code!

流程完成，当然要按照流程编制CODE了。

案例

程序完成了，要拿个图纸测试一下：

有图如下：

在需要将筒体长度改为4000，接管外伸都加长50。

用VCAD画的，筒体带数据

接管也带数据

先拉伸筒体，然后查询筒体明细，的确变更了1000，重量也跟着变了。

再拉伸接管，两个接管一起拉伸，同时修改接管的明细数据。

是不是完美解决了修改图纸的问题？

动画

VCAD使用技巧

VCAD-动态件号

VCAD改进之路

VCAD基础上二次开发

VCAD-图库1和图库2

VCAD高压法兰参数化

VCAD2018试用版

欢迎关注信息：VCAD001， 一个压力容器人的自我修养。