Message 1 of 4
how to replace titleblock with a prompted entry one

Not applicable
02-29-2016
05:14 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hello together,
I have a titleblock in a drawing but i want to delete it and replace it with an another one
which have some prompted entrys. But i dont know how to do it.
i've tried the code below, but i can only insert a titleblock wihtout any prompted entry.
how could I insert a titleblock with prompted entry through API within VB.Net?
Thank you. Richard
Dim invapp As Inventor.Application = System.Runtime.InteropServices.Marshal.GetActiveObject("Inventor.Application") Dim oSourceDocument As Inventor.DrawingDocument oSourceDocument = invapp.ActiveDocument Dim oSourceTitleBlockDef1 As Inventor.TitleBlockDefinition oSourceTitleBlockDef1 = oSourceDocument.TitleBlockDefinitions.Item("jx") Dim osheet As Inventor.Sheet osheet = oSourceDocument.ActiveSheet osheet.AddTitleBlock(oSourceTitleBlockDef1)