<?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 How to change edge collection in ChamferEdges in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/how-to-change-edge-collection-in-chamferedges/m-p/8148014#M86907</link>
    <description>&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I trying to change edge from chamfer feature using ChamferedEdges.RemoveObject(EdgeCol) but nothing change, can anyone help me.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Public Sub ChangeEdgeChamfer()&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oApp As Application&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oPD As PartDocument&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oPCD As PartComponentDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oFeats As PartFeatures&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oChamferFeat As ChamferFeature&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oChamferDef As ChamferDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oEdgeCol As EdgeCollection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oFace As Face&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oApp = ThisApplication&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oPD = oApp.ActiveDocument&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oPCD = oPD.ComponentDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oFeats = oPCD.Features&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oChamferFeat = oFeats.ChamferFeatures.Item(2)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oEdgeCol = oApp.TransientObjects.CreateEdgeCollection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; oChamferFeat.SetEndOfPart (True)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oChamferDef = oChamferFeat.Definition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oFace = oChamferDef.Face&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'get edge with radius 500mm&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Call oEdgeCol.Add(oFace.Edges.Item(4))&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'change exisiting edge with radius 506mm with new edge&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Call oChamferDef.ChamferedEdges.RemoveByObject(oEdgeCol)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; oChamferFeat.SetEndOfPart (False)&lt;BR /&gt;End Sub&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="Existing Top Chamfer" style="width: 205px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/525898iB45BD21C067BC319/image-dimensions/205x153?v=v2" width="205" height="153" role="button" title="ExistingTopChamfer.JPG" alt="Existing Top Chamfer" /&gt;&lt;span class="lia-inline-image-caption" onclick="event.preventDefault();"&gt;Existing Top Chamfer&lt;/span&gt;&lt;/span&gt;&amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp;&amp;nbsp; &lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Result After Change" style="width: 191px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/525899i0F1FCFE77A0AD60E/image-dimensions/191x154?v=v2" width="191" height="154" role="button" title="ResultAfterChangeEdge.JPG" alt="Result After Change" /&gt;&lt;span class="lia-inline-image-caption" onclick="event.preventDefault();"&gt;Result After Change&lt;/span&gt;&lt;/span&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
    <pubDate>Mon, 23 Jul 2018 09:31:18 GMT</pubDate>
    <dc:creator>dgreatice</dc:creator>
    <dc:date>2018-07-23T09:31:18Z</dc:date>
    <item>
      <title>How to change edge collection in ChamferEdges</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/how-to-change-edge-collection-in-chamferedges/m-p/8148014#M86907</link>
      <description>&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I trying to change edge from chamfer feature using ChamferedEdges.RemoveObject(EdgeCol) but nothing change, can anyone help me.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Public Sub ChangeEdgeChamfer()&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oApp As Application&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oPD As PartDocument&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oPCD As PartComponentDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oFeats As PartFeatures&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oChamferFeat As ChamferFeature&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oChamferDef As ChamferDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oEdgeCol As EdgeCollection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oFace As Face&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oApp = ThisApplication&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oPD = oApp.ActiveDocument&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oPCD = oPD.ComponentDefinition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oFeats = oPCD.Features&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oChamferFeat = oFeats.ChamferFeatures.Item(2)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oEdgeCol = oApp.TransientObjects.CreateEdgeCollection&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; oChamferFeat.SetEndOfPart (True)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oChamferDef = oChamferFeat.Definition&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set oFace = oChamferDef.Face&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'get edge with radius 500mm&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Call oEdgeCol.Add(oFace.Edges.Item(4))&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'change exisiting edge with radius 506mm with new edge&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Call oChamferDef.ChamferedEdges.RemoveByObject(oEdgeCol)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; oChamferFeat.SetEndOfPart (False)&lt;BR /&gt;End Sub&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="Existing Top Chamfer" style="width: 205px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/525898iB45BD21C067BC319/image-dimensions/205x153?v=v2" width="205" height="153" role="button" title="ExistingTopChamfer.JPG" alt="Existing Top Chamfer" /&gt;&lt;span class="lia-inline-image-caption" onclick="event.preventDefault();"&gt;Existing Top Chamfer&lt;/span&gt;&lt;/span&gt;&amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp;&amp;nbsp; &lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Result After Change" style="width: 191px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/525899i0F1FCFE77A0AD60E/image-dimensions/191x154?v=v2" width="191" height="154" role="button" title="ResultAfterChangeEdge.JPG" alt="Result After Change" /&gt;&lt;span class="lia-inline-image-caption" onclick="event.preventDefault();"&gt;Result After Change&lt;/span&gt;&lt;/span&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 23 Jul 2018 09:31:18 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/how-to-change-edge-collection-in-chamferedges/m-p/8148014#M86907</guid>
      <dc:creator>dgreatice</dc:creator>
      <dc:date>2018-07-23T09:31:18Z</dc:date>
    </item>
    <item>
      <title>Re: How to change edge collection in ChamferEdges</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/how-to-change-edge-collection-in-chamferedges/m-p/8228619#M88181</link>
      <description>&lt;P&gt;Need Help,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Tue, 28 Aug 2018 02:10:47 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/how-to-change-edge-collection-in-chamferedges/m-p/8228619#M88181</guid>
      <dc:creator>dgreatice</dc:creator>
      <dc:date>2018-08-28T02:10:47Z</dc:date>
    </item>
  </channel>
</rss>

