本节介绍打开模型和保存模型两个最常见的操作。

1.打开文件

打开文件的操作包括以下3个步骤：

(1)通过打开文件对话框，选择要打开的文件路径;
(2)初始化打开文件操作需要的参数(CCpfc类初始化Ipfc类再对Ipfc类的属性赋值);
(3)载入模型并显示。

Creo的文件的命名方式为”.类型.版本数字”进行，使用windows通用的FileDialog很难指定其后缀名，故本节采用VB API自带的对话框打开模型。调用Creo打开文件对话框只需要调用Session.UIOpenFile方法即可。Session.UIOpenFile的参数为IpfcFileOpenOptions类，老习惯用CCpfcFileOpenOptions.Create对其进行初始化即可，关键代码如下：

1
2
3
4
5
6
Dim fileOpenopts As IpfcFileOpenOptions
Dim filename As String
'使用ccpfc类初始化ipfc类，生成creo打开文件的对话框的选项
fileOpenopts = (New CCpfcFileOpenOptions).Create("*.prt")
'如果点击取消按钮，会throw一个"pfcExceptions::XToolkitUserAbort" Exception
filename = asyncConnection.Session.UIOpenFile(fileOpenopts)

载入并显示模型的流程为：使用Session.RetrievemodelWithOpts方法载入模型并返回一个Model对象，调用Model类的Display方法显示模型，Session.CurrentWindow.Activate方法将当前模型窗口激活。Session.RetrievemodelWithOpts有IpfcModelDescriptor和IpfcRetrieveModelOptions参数，通过CCpfc类对其进行初始化，关键代码如下：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim modelDesc As IpfcModelDescriptor
Dim retrieveModelOptions As IpfcRetrieveModelOptions
Dim model As IpfcModel
'使用ccpfc类初始化ipfc类，生成IpfcModelDescriptor
modelDesc = (New CCpfcModelDescriptor).Create(EpfcModelType.EpfcMDL_PART, Nothing, Nothing)
modelDesc.Path = filename
'使用ccpfc类初始化ipfc类，生成IpfcRetrieveModelOptions
retrieveModelOptions = (New CCpfcRetrieveModelOptions).Create
retrieveModelOptions.AskUserAboutReps = False
'加载零件
model = asyncConnection.Session.RetrievemodelWithOpts(modelDesc, retrieveModelOptions)
'显示零件
model.Display()
'激活当前窗体
asyncConnection.Session.CurrentWindow.Activate()

2、保存文件

保存当前模型的操作非常简单，完全按照面向对象的思想，调用对象的方法和属性即可。Session的CurrentModel表示当前打开的模型，为IpfcModel类。IpfcModel类提供了Save方法进行保存操作。IpfcModel同样提供了导入、导出、复制等操作，也是调用其方法即可，在此不在赘述。保存文件的代码如下：

1
asyncConnection.Session.CurrentModel.Save()

3.枚举文件

枚举文件需要调用IpfcBaseSession。ListFiles方法。我们得到的asyncConnection.Session为IpfcBaseSession的子类IpfcSession，可以调用父类的方法进行操作。IpfcBaseSession。ListFiles有三个参数，第一个为文件类型，第二个为文件版本(EpfcFileListOpt,枚举类)，第三个需要枚举文件夹。枚举文件夹下所有指定文件的代码如下：

1
Files = CType(asyncConnection.Session, IpfcBaseSession).ListFiles("*.prt", EpfcFileListOpt.EpfcFILE_LIST_LATEST, asyncConnection.Session.GetCurrentDirectory)

完整代码可在Github.com下载。