Journal to Delete Basic Curves
Journal to Delete Basic Curves
(OP)
I have a journal where the user selects curves to be deleted. My problem is that I have been unable to determine if a selected curve has dependents so that it can be removed from the list of curves to be deleted. Any help would be greatly appreciated.
Thanks,
Kevin
Thanks,
Kevin





RE: Journal to Delete Basic Curves
File-->Utilities-->Part Cleanup has a "Delete Unused Objects"
Or is the object to just delete certain unused curves?
RE: Journal to Delete Basic Curves
RE: Journal to Delete Basic Curves
CODE
Option Strict Off Imports System Imports NXOpen Imports NXOpen.UF Module Module1 Sub Main() Dim theSession As Session = Session.GetSession() Dim theUfSession As UFSession = UFSession.GetUFSession() Dim workPart As Part = theSession.Parts.Work Dim featTag As Tag = Tag.Null For Each myCurve As Curve In workPart.Curves theUfSession.Modl.AskObjectFeat(myCurve.Tag, featTag) If featTag = Tag.Null Then 'curve is unused myCurve.Highlight End If Next End Sub End Modulewww.nxjournaling.com