连载：基于solidworks软件织机零部件3D图库的设计（4）

    3.2 3D图库具体实现过程

    A型织轴处于分级编码的第四级，属于经纱与织物控制装置下织轴的子类，是织机的一个通用关键零部件，本文中限于篇幅，仅以A型织轴为例，阐述有关零部件参数化模型库的建立过程[8-9]。

    (1) 启动VB程序，建立一个新的标准EXE工程文件。特别需要注意的一点是：在标题栏显示的当前工程名及窗体名是通过修改属性窗口中“名称”属性及“caption”属性得以实现的，与实际的工程名及窗体名并无直接联系，实际的工程名及窗体名是通过诸如“A型织轴绘制.vbp”形式体现出来的。

    (2) 引用SolidWorks类型库文件。在VB里添加引用，单击菜单栏中“工程”>“引用”命令，选择“SolidWorks exposed Type Libraries For add-in Use”(SolidWorks插件库文件)、“SolidWorks 2007 Type Libray”(SolidWorks库文件)和“SolidWorks Consant Type library”(SolidWorks常数库)，如图5所示。

图5 VB引用SolidWorks类型库

    (3) 编辑窗体界面。拖动工具箱组件板上的Lable控件、TextBox控件及CommandButton控件到Form上；接下来设置相关控件属性。

    (4) 编程实现。在VB编程环境下，引用单元文件，创建相关函数及编写事件处理过程，实现程序功能。模块中存储的是原型实例的全参数化样板图，通过调用SolidWorks底层API函数，由参数驱动直接生成所需要的设计图纸，可方便地进行修改与完善。调用SolidWorks自动绘图的部分源代码如下。
 
    Dim swapp As Object               
    Dim part As Object                
    Dim boolstatus As Boolean         
    ‘定义接口
    Set swapp = CreateObject("SldWorks.Application") 
    Set part = swapp.NewPart()               
    swapp.Visible = True

    ‘获取SolidWorks软件接口并新建一个零件文件
    Set swapp = Nothing
    part.InsertSketch2 True
    part.CreateLine2 0， Val(txtd2.Caption) / 2000， 0， -(Val(txtl1.Caption) / 2 - Val(txta1.Caption) - Val(txta2.Caption) - Val(txta3.Caption)) / 1000， Val(txtd2.Caption) / 2000， 0
    …
    retval = part.SetTitle2("织轴 A" & Combo_d1.text & "×" & Combo_d2.text & "×" & Combo_d3.text & "×" & Combo_l1.text & "×" & Combo_l5.text & "×" & Combo_w.text & " " & btbz.text)
   ’以上语句为参数化后的建模命令语句及相关操作语句
    End Sub
   
    特别强调的是最后一句是依据标准中规定的命名格式对文件进行重命名，这种命名采用动态命名的机制，将用户输入的参数值动态传递并显示在文件名字之中，利于检查与存储。考虑到同一标准尺寸下由于其他尺寸变化可能表现形式不同，在程序主面板上添加备注一栏，可方便地添加备注到名称之中加以区别。对于其他标准与非标准零部件的命名采用相同的命名机理。

    设定好相关参数后，启动程序调用SolidWorks自动绘制的A型织轴三维图如图6所示。可交互式修改参数，直至达到满意的效果。

图6 A型织轴自动绘制的参数化模型

4 小结

    本文以A型织轴为例初步探讨了一种基于 SolidWorks二次开发织机零部件3D图库的方法，附有软件源代码。应用上述方法，开发出适合纺织行业常用的织机零部件3D库，可以避免重复绘图的不利之处，提高设计效率。该3D库仍有许多地方需要改进；此外，因为国家标准件已经有许多成熟的版本可供参考，所以本3D图库中考虑对接国家标准件部分以节省工作量。在编写事件处理过程时充分利用宏文件是一个很好的方法。

参考文献：
[1] Sungho Kim, In So Kweon. Automatic model-based 3D object recognition by combining feature matching with tracking[J]. Machine Vision and Applications,  2005, 5(16): 67-72.
[2] Liu Wei, He Yuanjun.Representation and retrieval of 3D-CAD models in parts library[J]. The International Journal of Advanced Manufacturing Technology, 2007, (1): 521-527.
[3] 刘培文. 纺织机械制图[M]. 第4版, 北京: 中国纺织出版社, 2004.
[4] 机械工程手册电机工程手册编辑委员会. 机械工程手册: 专用机械卷(五)[M].第2版, 北京: 机械工业出版社, 1997: 9-7-9-40.
[5] 全国纺织机械与附件标准化技术委员会. GB/T 20982.1-2007, 纺织机械与附件织机第1部分: 词汇和分类[S]. 北京: 中国标准出版社, 2008.
[6] 全国纺织机械与附件标准化技术委员会. GB/T 20982.3-2007, 纺织机械与附件织机第2部分: 附件词汇[S]. 北京: 中国标准出版社, 2008.
[7] 全国纺织机械与附件标准化技术委员会.GB/T 20982.3-2007, 纺织机械与附件织机第3部分: 织机零部件词汇[S]. 北京: 中国标准出版社, 2008.
[8] 赵卫东, 柳先辉, 卫刚. CAD软件二次开发平台实现技术[J]. 计算机辅助设计与图形学学报, 2003, 15(4): 512-516.
[9] 纺织工业部纺织机械研究所. FZ/T 90036-92, 纺织机械织轴术语和主要尺寸[S]. 纺织机械与器材实用标准汇编(2004版). 北京: 中国纺织出版社, 2004: 692-694.