[原创]：一个绘制方圆过渡吸捕罩的小程序（下载）

xiaping

风管零部件的绘制本身并不复杂，最近做一个系统。规格品种一多画起来也挺麻烦的。因此，想尽量提高效率通过编程可以简化绘图步骤，做到准确快捷。这个吸捕罩绘制程序只能算是半成品，本来打算将重量计算设计在内，由于时间关系没有做到。由于急于使用，将半成品进行了编译。和图是可以了。计算的问题只有等有空时再完成。不知道大家对此有无兴趣，先发一个演示上来。如果大家需要的话，我可以将半成品发上来先用用。如果兴趣不大等完善以后再发。

yang

放上来试试

wyh

众兄弟翘首以待。

e2002

易用性建议:

DCL 的控制改进一下 :
确定方向不需要这么复杂,而是点击"确定(Draw)"按钮后,由用户点两点后即开始绘制,而且最好可以连续绘制多个,若不选点即返回对话框,这样用户可以对输入参数修改后继续绘制不同尺寸的"产品",最后,由用户按"取消(Exit)"按钮退出程序

xiaping

这个程序完全可以正常使用，但是距我的目标还有一定的差距。由于方圆段的面积重量计算比较麻烦，计划有空时加上这个功能予以完善。完成后再上传一次。这个东东大家先凑合用着吧。对于提高画图效率还是有用的。使用方法与其他上传的一样。希望能够对大家有所帮助。
   

本程序适用于AUTOCAD2000及以后的版本，包括幻灯片文件。

wyh

除了圆管外，经常有排风罩出口用方管的情况，可不可以在程序中将方管加进去呢？

xiaping

最初由 wyh 发布
[B]除了圆管外，经常有排风罩出口用方管的情况，可不可以在程序中将方管加进去呢？ [/B]

完善时一并考虑，添加进去。

xiaping

本次吸捕罩添加了矩形出口形式罩的绘制，并自动计算出重量。方圆段的重量采用三角形逼近的方法进行近似计算，更加接近实际重量。十分感谢e2002斑竹提出的建议，但是我试了一下好像有一点问题，所以没有在本程序中采用。在适当的程序中会考虑采用的。改动完善以后的程序演示如下：

xiaping

程序在此，请提出意见和建议。