<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Description iLogic in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230274#M157459</link>
    <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/4988405"&gt;@kresh.bell&lt;/a&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I think here we'd want to use a highlight set, to maintain the selected components as we pick.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I hope this helps.&lt;BR /&gt;Best of luck to you in all of your Inventor pursuits,&lt;BR /&gt;Curtis&lt;BR /&gt;&lt;A href="http://inventortrenches.blogspot.com" target="_blank"&gt;http://inventortrenches.blogspot.com&lt;/A&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;

	&lt;SPAN&gt;'https://www.rapidtables.com/web/color/index.html&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255, 0, 0) 'red&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 255, 0) 'green&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 0, 255) 'blue&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255 255, 0) 'yellow&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255, 0, 255) 'magenta&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 255, 255) 'cyan&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;HLset&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;HighlightSet&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;.&lt;SPAN&gt;HighlightSets&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;()
	&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Color&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateColor&lt;/SPAN&gt;(255, 255, 0) &lt;SPAN&gt;'yellow&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;PartDocument&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;partdef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;PartComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;doc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;ObjectCollection&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateObjectCollection&lt;/SPAN&gt;

	&lt;SPAN&gt;While&lt;/SPAN&gt; &lt;SPAN&gt;True&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;SurfaceBody&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;CommandManager&lt;/SPAN&gt;.&lt;SPAN&gt;Pick&lt;/SPAN&gt;(&lt;SPAN&gt;SelectionFilterEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kPartBodyFilter&lt;/SPAN&gt;, &lt;SPAN&gt;"Select Body (Bodies). When you finish, Esc Key"&lt;/SPAN&gt;)
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;Nothing&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;While&lt;/SPAN&gt;
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;check&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;, &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;) = &lt;SPAN&gt;False&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;)
		&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;AddItem&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;While&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;distance&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Double&lt;/SPAN&gt;
	&lt;SPAN&gt;Try&lt;/SPAN&gt;
		&lt;SPAN&gt;distance&lt;/SPAN&gt; = (&lt;SPAN&gt;Double&lt;/SPAN&gt;.&lt;SPAN&gt;Parse&lt;/SPAN&gt;(&lt;SPAN&gt;InputBox&lt;/SPAN&gt;(&lt;SPAN&gt;"Chamfer distance"&lt;/SPAN&gt;, &lt;SPAN&gt;"MJM iLogic"&lt;/SPAN&gt;, 0.707))) / 10 &lt;SPAN&gt;' 0.707&lt;/SPAN&gt;
	&lt;SPAN&gt;Catch&lt;/SPAN&gt;
		&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Clear&lt;/SPAN&gt;
		&lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;edges&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;EdgeCollection&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateEdgeCollection&lt;/SPAN&gt;()

	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;SurfaceBody&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;
		&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;edge&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Edge&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt;.&lt;SPAN&gt;Edges&lt;/SPAN&gt;
			&lt;SPAN&gt;edges&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;Edge&lt;/SPAN&gt;)

		&lt;SPAN&gt;Next&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt;

	&lt;SPAN&gt;partdef&lt;/SPAN&gt;.&lt;SPAN&gt;Features&lt;/SPAN&gt;.&lt;SPAN&gt;ChamferFeatures&lt;/SPAN&gt;.&lt;SPAN&gt;AddUsingDistance&lt;/SPAN&gt;(&lt;SPAN&gt;edges&lt;/SPAN&gt;, &lt;SPAN&gt;distance&lt;/SPAN&gt;)

	&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Clear&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;check&lt;/SPAN&gt;(&lt;SPAN&gt;input&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt;, &lt;SPAN&gt;col&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;ObjectCollection&lt;/SPAN&gt;)
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;col&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; = 0 &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;False&lt;/SPAN&gt;

	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;obj&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;col&lt;/SPAN&gt;
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;obj&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;input&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;True&lt;/SPAN&gt;

	&lt;SPAN&gt;Next&lt;/SPAN&gt;

	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;False&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
    <pubDate>Sun, 10 Sep 2023 14:51:18 GMT</pubDate>
    <dc:creator>Curtis_Waguespack</dc:creator>
    <dc:date>2023-09-10T14:51:18Z</dc:date>
    <item>
      <title>Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227300#M157391</link>
      <description>&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;is it possible create rule for assembly environment for running small description window?&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;When I run rule I need select part, when I select part, I can add description for this part. If I select some other part, I can again add description for this selected part. When I finish with adding description, click esc or done for exit.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Screenshot 2023-09-08 134846.png" style="width: 999px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/1263978i9479CD8C8EAE9C10/image-size/large?v=v2&amp;amp;px=999" role="button" title="Screenshot 2023-09-08 134846.png" alt="Screenshot 2023-09-08 134846.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 12:53:47 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227300#M157391</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-08T12:53:47Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227329#M157395</link>
      <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/4988405"&gt;@kresh.bell&lt;/a&gt;&amp;nbsp;.&amp;nbsp;Please try this code:&lt;/P&gt;&lt;LI-CODE lang="visual-basic"&gt;Dim oInvApp As Inventor.Application = ThisApplication
Dim oAsmDoc As AssemblyDocument = oInvApp.ActiveDocument
Dim oCM As CommandManager = oInvApp.CommandManager
Do
	Dim oOcc As ComponentOccurrence = oCM.Pick(SelectionFilterEnum.kAssemblyLeafOccurrenceFilter, _
												"Select your part...")
	If oOcc Is Nothing Then Exit Sub
	If TypeOf oOcc.Definition.Document Is PartDocument Then
		Dim oPartDoc As PartDocument = oOcc.Definition.Document
		Dim oProp As Inventor.Property = oPartDoc.PropertySets("Design Tracking Properties")("Description")
		oProp.Value = InputBox("Please Enter a Description", "Description", oProp.Value)
	End If
Loop&lt;/LI-CODE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 13:08:48 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227329#M157395</guid>
      <dc:creator>Andrii_Humeniuk</dc:creator>
      <dc:date>2023-09-08T13:08:48Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227434#M157403</link>
      <description>&lt;P&gt;Great job, work perfect, thanks&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 13:39:13 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227434#M157403</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-08T13:39:13Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227495#M157408</link>
      <description>&lt;P&gt;Please, can you fix minor bug? If part already have description and if I click cancel this delete exist description. Is it possible, if part already have description that cancel do nothing?&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 13:58:29 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227495#M157408</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-08T13:58:29Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227558#M157410</link>
      <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/4988405"&gt;@kresh.bell&lt;/a&gt;&amp;nbsp;,&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I started replying to this earlier but had to take a meeting, and&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/13518190"&gt;@Andrii_Humeniuk&lt;/a&gt;&amp;nbsp;was too fast for me! and had already provided a solution by the time I started to post this.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;In any case, I had this version ready, so I'll share it also... maybe it'll help someone in the future.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;It looks like the 2 versions work pretty much the same.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;The primary difference I see is that Andrii's excellent version reaches down into a subassembly and gets the part, when a subassembly is selected. Whereas my example gets the subassembly description.&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Also my example highlights the selected component by using the select set and puts the name in the message box, but those are minor differences.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I hope this helps.&lt;BR /&gt;Best of luck to you in all of your Inventor pursuits,&lt;BR /&gt;Curtis&lt;BR /&gt;&lt;A href="http://inventortrenches.blogspot.com" target="_blank" rel="noopener"&gt;http://inventortrenches.blogspot.com&lt;/A&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;LI-CODE lang="visual-basic"&gt;Dim oOccurrence As ComponentOccurrence

msg = "Select a component (press ESC to exit)"
While True
	oOccurrence = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kAssemblyOccurrenceFilter, msg)

	' If nothing gets selected then we're done	
	If IsNothing(oOccurrence) Then Exit While

	oName = oOccurrence.Name

	ThisApplication.ActiveDocument.selectset.select(oOccurrence)
	oDesc = iProperties.Value(oName, "Project", "Description")
	oDesc = InputBox(oName &amp;amp; " Description", "iLogic", oDesc)
	If Not oDesc = Nothing Then iProperties.Value(oName, "Project", "Description") = oDesc

End While
&lt;/LI-CODE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 14:18:00 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227558#M157410</guid>
      <dc:creator>Curtis_Waguespack</dc:creator>
      <dc:date>2023-09-08T14:18:00Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227698#M157422</link>
      <description>&lt;P&gt;Thanks Curtis!!!!&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 08 Sep 2023 15:22:10 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12227698#M157422</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-08T15:22:10Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230141#M157458</link>
      <description>&lt;P&gt;Curtis,&lt;/P&gt;&lt;P&gt;thanks again. Show selected body in your iLogic is realy very usefull.&lt;/P&gt;&lt;P&gt;I have one iLogic, but for part envirovment, for add chamfer to selected body. Is it posibble edit this iLogic that I see selected bodies on same way as I see selected parts in your iLogic?&lt;/P&gt;&lt;LI-CODE lang="general"&gt;Sub Main
	Dim doc As Inventor.PartDocument = ThisApplication.ActiveDocument
	Dim partdef As Inventor.PartComponentDefinition = doc.ComponentDefinition
	Dim bodyCol As Inventor.ObjectCollection = ThisApplication.TransientObjects.CreateObjectCollection
	
	For i As Integer = 1 To partdef.SurfaceBodies.Count
		Dim body As SurfaceBody = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartBodyFilter, "Select Body (Bodies). When you finish, Esc Key")
		If body Is Nothing Then Exit For
		If check(body, bodyCol) = False Then  bodyCol.Add(body)
		
	Next

	Dim distance As Double = (Double.Parse(InputBox("Chamfer distance", "MJM iLogic", 0.707))) / 10 ' 0.707
	Dim edges As EdgeCollection = ThisApplication.TransientObjects.CreateEdgeCollection()
	
	For Each body As Inventor.SurfaceBody In bodyCol
		For Each edge As Edge In body.Edges
			edges.Add(Edge)
			
		Next
	Next
	
	partdef.Features.ChamferFeatures.AddUsingDistance(edges, distance)
End Sub

Private Function check(input As Object, col As Inventor.ObjectCollection)
	If col.Count = 0 Then Return False
		
	For Each obj As Object In col
		If obj Is input Then Return True
		
	Next
	
	Return False
End Function&lt;/LI-CODE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sun, 10 Sep 2023 12:24:45 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230141#M157458</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-10T12:24:45Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230274#M157459</link>
      <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/4988405"&gt;@kresh.bell&lt;/a&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I think here we'd want to use a highlight set, to maintain the selected components as we pick.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I hope this helps.&lt;BR /&gt;Best of luck to you in all of your Inventor pursuits,&lt;BR /&gt;Curtis&lt;BR /&gt;&lt;A href="http://inventortrenches.blogspot.com" target="_blank"&gt;http://inventortrenches.blogspot.com&lt;/A&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;

	&lt;SPAN&gt;'https://www.rapidtables.com/web/color/index.html&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255, 0, 0) 'red&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 255, 0) 'green&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 0, 255) 'blue&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255 255, 0) 'yellow&lt;/SPAN&gt;
	&lt;SPAN&gt;'(255, 0, 255) 'magenta&lt;/SPAN&gt;
	&lt;SPAN&gt;'(0, 255, 255) 'cyan&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;HLset&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;HighlightSet&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;.&lt;SPAN&gt;HighlightSets&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;()
	&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Color&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateColor&lt;/SPAN&gt;(255, 255, 0) &lt;SPAN&gt;'yellow&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;PartDocument&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;partdef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;PartComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;doc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;ObjectCollection&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateObjectCollection&lt;/SPAN&gt;

	&lt;SPAN&gt;While&lt;/SPAN&gt; &lt;SPAN&gt;True&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;SurfaceBody&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;CommandManager&lt;/SPAN&gt;.&lt;SPAN&gt;Pick&lt;/SPAN&gt;(&lt;SPAN&gt;SelectionFilterEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kPartBodyFilter&lt;/SPAN&gt;, &lt;SPAN&gt;"Select Body (Bodies). When you finish, Esc Key"&lt;/SPAN&gt;)
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;Nothing&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;While&lt;/SPAN&gt;
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;check&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;, &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;) = &lt;SPAN&gt;False&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;)
		&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;AddItem&lt;/SPAN&gt;(&lt;SPAN&gt;body&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;While&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;distance&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Double&lt;/SPAN&gt;
	&lt;SPAN&gt;Try&lt;/SPAN&gt;
		&lt;SPAN&gt;distance&lt;/SPAN&gt; = (&lt;SPAN&gt;Double&lt;/SPAN&gt;.&lt;SPAN&gt;Parse&lt;/SPAN&gt;(&lt;SPAN&gt;InputBox&lt;/SPAN&gt;(&lt;SPAN&gt;"Chamfer distance"&lt;/SPAN&gt;, &lt;SPAN&gt;"MJM iLogic"&lt;/SPAN&gt;, 0.707))) / 10 &lt;SPAN&gt;' 0.707&lt;/SPAN&gt;
	&lt;SPAN&gt;Catch&lt;/SPAN&gt;
		&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Clear&lt;/SPAN&gt;
		&lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;edges&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;EdgeCollection&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateEdgeCollection&lt;/SPAN&gt;()

	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;SurfaceBody&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;bodyCol&lt;/SPAN&gt;
		&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;edge&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Edge&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;body&lt;/SPAN&gt;.&lt;SPAN&gt;Edges&lt;/SPAN&gt;
			&lt;SPAN&gt;edges&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;Edge&lt;/SPAN&gt;)

		&lt;SPAN&gt;Next&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt;

	&lt;SPAN&gt;partdef&lt;/SPAN&gt;.&lt;SPAN&gt;Features&lt;/SPAN&gt;.&lt;SPAN&gt;ChamferFeatures&lt;/SPAN&gt;.&lt;SPAN&gt;AddUsingDistance&lt;/SPAN&gt;(&lt;SPAN&gt;edges&lt;/SPAN&gt;, &lt;SPAN&gt;distance&lt;/SPAN&gt;)

	&lt;SPAN&gt;HLset&lt;/SPAN&gt;.&lt;SPAN&gt;Clear&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;check&lt;/SPAN&gt;(&lt;SPAN&gt;input&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt;, &lt;SPAN&gt;col&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;ObjectCollection&lt;/SPAN&gt;)
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;col&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; = 0 &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;False&lt;/SPAN&gt;

	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;obj&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;col&lt;/SPAN&gt;
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;obj&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;input&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;True&lt;/SPAN&gt;

	&lt;SPAN&gt;Next&lt;/SPAN&gt;

	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;False&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sun, 10 Sep 2023 14:51:18 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230274#M157459</guid>
      <dc:creator>Curtis_Waguespack</dc:creator>
      <dc:date>2023-09-10T14:51:18Z</dc:date>
    </item>
    <item>
      <title>Re: Description iLogic</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230282#M157460</link>
      <description>&lt;P&gt;Perfect, thanks!!!&lt;/P&gt;</description>
      <pubDate>Sun, 10 Sep 2023 15:00:25 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/description-ilogic/m-p/12230282#M157460</guid>
      <dc:creator>kresh.bell</dc:creator>
      <dc:date>2023-09-10T15:00:25Z</dc:date>
    </item>
  </channel>
</rss>

