All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---AnyObject | +---GenericActionFactory
Dim oSelectAct As Activity set oSelectAct = CATIA.ActiveDocument.Selection.FindObject("CATIAActivity") Dim objGenActFact As GenericActionFactory set objGenActFact = oSelectAct.GetTechnologicalObject("GenericActionFactory")
o Func CreateGenericAction( | CATBSTR | iActionType, |
boolean | iBefore, | |
CATIAActivity | iReferenceActivity) As DELMIAGenericAction |
Dim objGenActFact As GenericActionFactory ...... Dim refAct As Activity Dim objGenAct as GenericAction CATIASelection ...... Before = TRUE set refAct = CATIA.ActiveDocument.Selection.FindObject("CATIAActivity") set objGenAct = objGenActFact.CreateGenericAction("DNBIgpSpotWeld", False, refAct) ..
Copyright © 2003, Dassault Systèmes. All rights reserved.