Difference between revisions of "CheckProjection"
From scripting
(Created page with " Function CheckProjection(CElement As Variant, CSupport As Variant) As Boolean On Error GoTo Blast Dim TestInt As HybridShapeProject Set TestInt = MyHSFactory.AddNewProject...") |
(No difference)
|
Latest revision as of 05:13, 22 April 2017
Function CheckProjection(CElement As Variant, CSupport As Variant) As Boolean On Error GoTo Blast Dim TestInt As HybridShapeProject Set TestInt = MyHSFactory.AddNewProject(CElement, CSupport) CATIA.ActiveDocument.Part.UpdateObject TestInt CheckProjection = True Exit Function Blast: CheckProjection = False End Function