<?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 Create 2D sketch in IDW using API in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/create-2d-sketch-in-idw-using-api/m-p/8105525#M86050</link>
    <description>&lt;P&gt;I need to create a 2D sketch from parameters stored in a CSV file for an object that would be laser cut. The code sample I have does not fail, but results in nothing. I'm running this code in a module withing a larger project which is why I'm calling variables and don't have them declared.&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;Public Sub Retainer(CompDef, TG, m_inventorApp, Sketch, ID)

        Dim DrawDoc = m_inventorApp.Documents.Add(DocumentTypeEnum.kDrawingDocumentObject, m_inventorApp.FileManager.GetTemplateFile(DocumentTypeEnum.kDrawingDocumentObject))

        Dim Sheet As Sheet = DrawDoc.ActiveSheet&lt;BR /&gt;
        Sheet.Border.Delete()
        Sheet.TitleBlock.Delete()

        Dim Width As Double = 24 * 2.54
        Dim Height As Double = 12 * 2.54

        Sheet.Size = DrawingSheetSizeEnum.kCustomDrawingSheetSize
        Sheet.Width = Width
        Sheet.Height = Height


        Sketch(1) = CompDef.Sketches.Add(CompDef.WorkPlanes(3))
        Dim Retainer As SketchCircle = Sketch(1).SketchCircles.AddByCenterRadius(TG.CreatePoint2d(0, 0), ID / 2)
        DrawDoc.Update()
    End Sub&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
    <pubDate>Mon, 02 Jul 2018 21:29:59 GMT</pubDate>
    <dc:creator>Anonymous</dc:creator>
    <dc:date>2018-07-02T21:29:59Z</dc:date>
    <item>
      <title>Create 2D sketch in IDW using API</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/create-2d-sketch-in-idw-using-api/m-p/8105525#M86050</link>
      <description>&lt;P&gt;I need to create a 2D sketch from parameters stored in a CSV file for an object that would be laser cut. The code sample I have does not fail, but results in nothing. I'm running this code in a module withing a larger project which is why I'm calling variables and don't have them declared.&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;Public Sub Retainer(CompDef, TG, m_inventorApp, Sketch, ID)

        Dim DrawDoc = m_inventorApp.Documents.Add(DocumentTypeEnum.kDrawingDocumentObject, m_inventorApp.FileManager.GetTemplateFile(DocumentTypeEnum.kDrawingDocumentObject))

        Dim Sheet As Sheet = DrawDoc.ActiveSheet&lt;BR /&gt;
        Sheet.Border.Delete()
        Sheet.TitleBlock.Delete()

        Dim Width As Double = 24 * 2.54
        Dim Height As Double = 12 * 2.54

        Sheet.Size = DrawingSheetSizeEnum.kCustomDrawingSheetSize
        Sheet.Width = Width
        Sheet.Height = Height


        Sketch(1) = CompDef.Sketches.Add(CompDef.WorkPlanes(3))
        Dim Retainer As SketchCircle = Sketch(1).SketchCircles.AddByCenterRadius(TG.CreatePoint2d(0, 0), ID / 2)
        DrawDoc.Update()
    End Sub&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 02 Jul 2018 21:29:59 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/create-2d-sketch-in-idw-using-api/m-p/8105525#M86050</guid>
      <dc:creator>Anonymous</dc:creator>
      <dc:date>2018-07-02T21:29:59Z</dc:date>
    </item>
  </channel>
</rss>

