iLogic - Delete Custom iProperties

Issue:
You have some custom iProperties in your file that you want to remove. Because you have a lot of files that contain these custom iProperties, you find yourself doing this quite often. You'd like an iLogic rule that will help with this when you encounter these custom iProperties.

Solution:
Here are three rule variations to help with this.

Variation 1
Delete only the custom iProperties found in the list.

'------- start of ilogic ------

'define list of custom properties to delete

Dim MyArrayList As New ArrayList

MyArrayList.add("Hello World 001")

MyArrayList.add("Hello World 002")

MyArrayList.add("Hello World 003")

'define custom property collection

oCustomPropertySet = ThisDoc.Document.PropertySets.Item("Inventor User Defined Properties")

'look at each property in the collection

For Each oCustProp in oCustomPropertySet

'check property name against the list you want to delete

If MyArrayList.Contains(oCustProp.name)Then

'delete the custom iProperty

oCustProp.Delete

Else

'skip it

End If

Next

'------- end of ilogic ------

Variation 2
Delete only the custom iProperties NOT found in the list.

'------- start of ilogic ------

'define list of custom properties to keep

Dim MyArrayList As New ArrayList

MyArrayList.add("Hello World 001")

MyArrayList.add("Hello World 002")

MyArrayList.add("Hello World 003")

'define custom property collection

oCustomPropertySet = ThisDoc.Document.PropertySets.Item("Inventor User Defined Properties")

'look at each property in the collection

For Each oCustProp in oCustomPropertySet

'check property name against the list you don't want to delete

If MyArrayList.Contains(oCustProp.name)Then

'skip it

Else

'delete the custom iProperty

oCustProp.Delete

End If

Next

'------- end of ilogic ------

Variation 3
Delete All custom iProperties found in the part.

'------- start of ilogic ------

'define custom property collection

oCustomPropertySet = ThisDoc.Document.PropertySets.Item("Inventor User Defined Properties")

'look at each property in the collection

For Each oCustProp in oCustomPropertySet

'delete the custom iProperty

oCustProp.Delete

Next

'------- end of ilogic ------

Infinite Skills – Autodesk Inventor 2014 Tutorial Series

Are you looking for a video tutorial series for Autodesk Inventor?

 

Infinite Skills has recently released its Learning Autodesk Inventor 2014 series featuring instructor Adam Cooper.  I was provided the DVD and asked to review this tutorial series, and was very pleased with the content found within.

When I popped in the DVD, the autoplay opened the viewing application and presented me with the Chapter menu as shown here:

Click to Enlarge

 

Once I clicked on Chapter 1, I was presented with a list of topics as shown here:



Click to Enlarge

 



A status legend on the right shows which videos I've watched with a shaded dot, as well as a partially shaded dot for those videos that I only watched part of. As you can image this can be a great help when jumping around within the chapters.

Once a topic is selected the video plays in the application. The author's pace is quite good, but since it is a video you can always use the buttons found in the video control tool bar to pause and rewind as needed.




Click to Enlarge

 Also included on the DVD are all of the working files needed for the exercises. The files can be accessed easily via the video interface.



Click to Enlarge

This DVD contains some outstanding material from a very knowledgeable instructor. You'll have the feeling you're in the classroom being led through the course material with Adam Cooper right there helping you along the way!

For more information, have a look at the Infinite Skills website:
 http://www.infiniteskills.com/training/learning-autodesk-inventor-2014.html