All Frameworks Object Hierarchy This Framework Previous Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---AnyObject | +---PspWorkbench
o Sub ExportProperties( | CATIADocument | iDocumentToExportFrom, |
CATBSTR | iXMLOutputFileName) |
Dim objPspWorkbench As PspWorkbench Dim objCATIAV5CurDocument As Document Dim iXMLOutputFileName As String Set objCATIAV5CurDocument = CATIA.ActiveDocument Set objProductRoot = objCATIAV5CurDocument.Product Set objPspWorkbench = objProductRoot.GetTechnologicalObject ("PspWorkbench") .. objThisIntf.ExportProperties objCATIAV5CurDocument, iXMLOutputFileName
o Func GetApplication( | CatPspIDLApplicationID | iApplicationID) As CATIAPspApplication |
Dim objPspWorkbench As PspWorkbench Dim objArg1 As CatPspIDLApplicationID Dim objArg2 As PspApplication objArg1 = catPspIDLCATPiping Set objArg2 = objPspWorkbench.GetApplication (objArg1)
o Func GetInterface( | CATBSTR | iInterfaceName, |
CATIABase | iObject) As CATIABase |
Dim objPspWorkbench As PspWorkbench Dim objPspApplication As PspApplication Dim objPspAppFactory As PspAppFactory Dim objProductRoot As Product Set objProductRoot = CATIA.ActiveDocument.Product Set objPspWorkbench = objProductRoot.GetTechnologicalObject ("PspWorkbench") Set objPspPipApplication = objPspWorkbench.GetApplication(catPspIDLCATPiping) Set objPspPipAppFactory = objPspWorkbench.GetInterface ("CATIAPspAppFactory",objPspPipApplication)
Copyright © 2003, Dassault Systèmes. All rights reserved.