3.2 3D圖庫具體實(shí)現(xiàn)過程

    A型織軸處于分級編碼的第四級，屬于經(jīng)紗與織物控制裝置下織軸的子類，是織機(jī)的一個(gè)通用關(guān)鍵零部件，本文中限于篇幅，僅以A型織軸為例，闡述有關(guān)零部件參數(shù)化模型庫的建立過程[8-9]。

    (1) 啟動(dòng)VB程序，建立一個(gè)新的標(biāo)準(zhǔn)EXE工程文件。特別需要注意的一點(diǎn)是：在標(biāo)題欄顯示的當(dāng)前工程名及窗體名是通過修改屬性窗口中“名稱”屬性及“caption”屬性得以實(shí)現(xiàn)的，與實(shí)際的工程名及窗體名并無直接聯(lián)系，實(shí)際的工程名及窗體名是通過諸如“A型織軸繪制.vbp”形式體現(xiàn)出來的。

    (2) 引用SolidWorks類型庫文件。在VB里添加引用，單擊菜單欄中“工程”>“引用”命令，選擇“SolidWorks exposed Type Libraries For add-in Use”(SolidWorks插件庫文件)、“SolidWorks 2007 Type Libray”(SolidWorks庫文件)和“SolidWorks Consant Type library”(SolidWorks常數(shù)庫)，如圖5所示。

圖5 VB引用SolidWorks類型庫

    (3) 編輯窗體界面。拖動(dòng)工具箱組件板上的Lable控件、TextBox控件及CommandButton控件到Form上；接下來設(shè)置相關(guān)控件屬性。

    (4) 編程實(shí)現(xiàn)。在VB編程環(huán)境下，引用單元文件，創(chuàng)建相關(guān)函數(shù)及編寫事件處理過程，實(shí)現(xiàn)程序功能。模塊中存儲的是原型實(shí)例的全參數(shù)化樣板圖，通過調(diào)用SolidWorks底層API函數(shù)，由參數(shù)驅(qū)動(dòng)直接生成所需要的設(shè)計(jì)圖紙，可方便地進(jìn)行修改與完善。調(diào)用SolidWorks自動(dòng)繪圖的部分源代碼如下。
 
    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軟件接口并新建一個(gè)零件文件
    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)
   ’以上語句為參數(shù)化后的建模命令語句及相關(guān)操作語句
    End Sub
   
    特別強(qiáng)調(diào)的是最后一句是依據(jù)標(biāo)準(zhǔn)中規(guī)定的命名格式對文件進(jìn)行重命名，這種命名采用動(dòng)態(tài)命名的機(jī)制，將用戶輸入的參數(shù)值動(dòng)態(tài)傳遞并顯示在文件名字之中，利于檢查與存儲。考慮到同一標(biāo)準(zhǔn)尺寸下由于其他尺寸變化可能表現(xiàn)形式不同，在程序主面板上添加備注一欄，可方便地添加備注到名稱之中加以區(qū)別。對于其他標(biāo)準(zhǔn)與非標(biāo)準(zhǔn)零部件的命名采用相同的命名機(jī)理。

    設(shè)定好相關(guān)參數(shù)后，啟動(dòng)程序調(diào)用SolidWorks自動(dòng)繪制的A型織軸三維圖如圖6所示。可交互式修改參數(shù)，直至達(dá)到滿意的效果。

圖6 A型織軸自動(dòng)繪制的參數(shù)化模型

4 小結(jié)

    本文以A型織軸為例初步探討了一種基于 SolidWorks二次開發(fā)織機(jī)零部件3D圖庫的方法，附有軟件源代碼。應(yīng)用上述方法，開發(fā)出適合紡織行業(yè)常用的織機(jī)零部件3D庫，可以避免重復(fù)繪圖的不利之處，提高設(shè)計(jì)效率。該3D庫仍有許多地方需要改進(jìn)；此外，因?yàn)閲覙?biāo)準(zhǔn)件已經(jīng)有許多成熟的版本可供參考，所以本3D圖庫中考慮對接國家標(biāo)準(zhǔn)件部分以節(jié)省工作量。在編寫事件處理過程時(shí)充分利用宏文件是一個(gè)很好的方法。

參考文獻(xiàn)：
[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] 劉培文. 紡織機(jī)械制圖[M]. 第4版, 北京: 中國紡織出版社, 2004.
[4] 機(jī)械工程手冊電機(jī)工程手冊編輯委員會. 機(jī)械工程手冊: 專用機(jī)械卷(五)[M].第2版, 北京: 機(jī)械工業(yè)出版社, 1997: 9-7-9-40.
[5] 全國紡織機(jī)械與附件標(biāo)準(zhǔn)化技術(shù)委員會. GB/T 20982.1-2007, 紡織機(jī)械與附件織機(jī)第1部分: 詞匯和分類[S]. 北京: 中國標(biāo)準(zhǔn)出版社, 2008.
[6] 全國紡織機(jī)械與附件標(biāo)準(zhǔn)化技術(shù)委員會. GB/T 20982.3-2007, 紡織機(jī)械與附件織機(jī)第2部分: 附件詞匯[S]. 北京: 中國標(biāo)準(zhǔn)出版社, 2008.
[7] 全國紡織機(jī)械與附件標(biāo)準(zhǔn)化技術(shù)委員會.GB/T 20982.3-2007, 紡織機(jī)械與附件織機(jī)第3部分: 織機(jī)零部件詞匯[S]. 北京: 中國標(biāo)準(zhǔn)出版社, 2008.
[8] 趙衛(wèi)東, 柳先輝, 衛(wèi)剛. CAD軟件二次開發(fā)平臺實(shí)現(xiàn)技術(shù)[J]. 計(jì)算機(jī)輔助設(shè)計(jì)與圖形學(xué)學(xué)報(bào), 2003, 15(4): 512-516.
[9] 紡織工業(yè)部紡織機(jī)械研究所. FZ/T 90036-92, 紡織機(jī)械織軸術(shù)語和主要尺寸[S]. 紡織機(jī)械與器材實(shí)用標(biāo)準(zhǔn)匯編(2004版). 北京: 中國紡織出版社, 2004: 692-694.