All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---AnyObject | +---MountManager
Dim objMountManager As MountManager Dim objRobot as Product Set objMountManager = objRobot.GetTechnologicalObject("MountManager" )
o Sub GetMountedDevices( | CATSafeArrayVariant | oDeviceList) |
Dim objMountManager As MountManager Dim DeviceList(3) As Product .. objMountManager.GetMountedDevices DeviceList
o Sub IsDeviceMounted( | CATIAProduct | iDevice, |
boolean | iIsMounted) |
Dim objMountManager As MountManager Dim Device As Product Dim IsMounted As Boolean .. objMountManager.IsDeviceMounted Device,IsMounted
o Sub MountDevice( | CATIAProduct | iDevice, |
CATBSTR | iToolProfileName, | |
CATSafeArrayVariant | iMountOffset, | |
boolean | iToolMobility, | |
DELMIATag | iToolTag, | |
DELMIATag | iBaseTag) |
Dim objMountManager As MountManager Dim Device As Product ... Dim ToolMobility As Boolean ToolMobility = TRUE Dim TCPMatrix(5) As List TCPMatrix(0)=0 TCPMatrix(1)=0 TCPMatrix(2)=0 TCPMatrix(3)=0 TCPMatrix(4)=0 TCPMatrix(5)=0 Dim ToolProfileName As String ToolProfileName = "Tool.1" Dim BaseTag as Tag Dim ToolTag as Tag ... objMountManager.MountDevice object,name2,TCPMatrix,ModifyRef,ToolTag,Nothing
o Sub ReMountDevice( | CATIAProduct | iDevice) |
Dim objMountManager As MountManager Dim Device As Product .. objMountManager.ReMountDevice Device
o Sub UnMountDevice( | CATIAProduct | iDevice) |
Dim objMountManager As MountManager Dim Device As Product .. objMountManager.UnMountDevice Device
o Sub UnSetDevice( | CATIAProduct | iDevice) |
Dim objMountManager As MountManager Dim Device As Product .. objMountManager.UnSetDevice Device
Copyright © 2003, Dassault Systèmes. All rights reserved.