07-22-2019
11:33 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
07-22-2019
11:33 PM
@Anonymous,
Try below iLogic code
Dim oAsm As AssemblyDocument = ThisApplication.ActiveDocument
Dim oAsmCompDef As AssemblyComponentDefinition = oAsm.ComponentDefinition
Line1 :
comp = ThisApplication.CommandManager.Pick(
SelectionFilterEnum.kAssemblyOccurrenceFilter,
"Select a components")
Dim oConstraint As AssemblyConstraint
For Each oConstraint In comp.Constraints
If oConstraint.Type = kAngleConstraintObject Then
Call oConstraint.Delete()
End If
Next
GoTo Line1
Thanks and regards,
CHANDRA SHEKAR G
Developer Advocate
Autodesk Developer Network
