15.4.2  实例——部件模型树浏览器

15.4.2 实例——部件模型树浏览器

本节介绍一个显示部件的装配树结构的程序范例,对于学徒服务器的一些编程语法我们结合程序做简要介绍。

该程序范例位于光盘的“\二次开发\AssemblyTree\”目录下

978-7-111-44986-7-Part04-256.jpg 在VB中包含学徒服务器类型库

在编写程序之前,首先要在VB中包含学徒服务器类型库。选择【Project】菜单下的【Reference】选项,则打开“Reference”对话框,选择其中的【Autodesk Inventor’s Apprentice Object Library】选项,如图15-32所示。

本节的范例程序是首先打开一个Inventor的部件文件,同时部件文件的装配模型树显示在程序界面中,如图15-33所示。

978-7-111-44986-7-Part04-257.jpg

图15-32 “Reference”对话框

978-7-111-44986-7-Part04-258.jpg 在VB下新建一个标准EXE文件

在界面上添加一个文本框(名称为txtFilename),一个按钮(名称为cmdBrowse),一个CommonDialog控件(名称为Common Dialog1),一个ImageList控件(名称为img List),还有一个TreeView控件(名称为treList),如图15-34所示。下面分别说明各个部分的程序代码。

978-7-111-44986-7-Part04-259.jpg 对程序用到的全局变量进行声明,代码如下: Option Explicit

Private oApprenticeApp As ApprenticeServerComponent

Private TreeBuilt As Boolean

978-7-111-44986-7-Part04-260.jpg

图15-33 部件文件的装配模型树

978-7-111-44986-7-Part04-261.jpg

图15-34 程序界面

978-7-111-44986-7-Part04-262.jpg 当单击按钮,则打开“打开”对话框以选择文件,单击对话框上的【确定】按钮后,则显示模型树。为按钮添加处理函数如下:

978-7-111-44986-7-Part04-263.jpg

978-7-111-44986-7-Part04-264.jpg

978-7-111-44986-7-Part04-265.jpg 绘制模型树的子函数BuildTree程序代码如下:

978-7-111-44986-7-Part04-266.jpg

978-7-111-44986-7-Part04-267.jpg 递归函数GetComponents的作用是遍历模型树中的元素,并且将其添加到TreeList中。GetComponents的程序代码如下:

978-7-111-44986-7-Part04-268.jpg

978-7-111-44986-7-Part04-269.jpg 添加其他部分代码,如下:

978-7-111-44986-7-Part04-270.jpg

978-7-111-44986-7-Part04-271.jpg