Insert Block into Another Open Drawing

ChrisPicklesimer — Wed, 30 Oct 2013 19:09:29 GMT

I would like to be able to collect information from a drawing via a sub-form and then insert a block with attributes (populated with collected info) into another open drawing. The insert operation would be launched from a button on my sub form.

Is this possible?

From the code below I attempted a test to simply select a point from another open drawing but was not successful. However, once I closed both forms the target drawing file is activated.

Thanks for any insight.

Chris

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Hide()
        Dim docMgr As DocumentCollection = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager
        Dim i As Integer = 0
        For Each doc As Document In docMgr
            Autodesk.AutoCAD.ApplicationServices.Application.ShowAlertDialog(doc.Name)
            If i = 1 Then
                Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.DocumentActivationEnabled = True
                Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument = doc

                Dim ed As Editor = AcApp.Application.DocumentManager.MdiActiveDocument.Editor
                Dim dwg As Database = ed.Document.Database

                Dim prPointOptions As PromptPointOptions = New PromptPointOptions(ControlChars.NewLine & "pick")
                Dim prPointRes As PromptPointResult

                prPointOptions.AllowNone = True
                prPointRes = ed.GetPoint(prPointOptions)

                If prPointRes.Status = Autodesk.AutoCAD.EditorInput.PromptStatus.OK Then
                    MsgBox(prPointRes.Value.X.ToString & " - " & prPointRes.Value.Y.ToString)
                End If
            End If
            i = i + 1
        Next
        Me.Show()
    End Sub

Re: Insert Block into Another Open Drawing

Hallex — Thu, 31 Oct 2013 20:36:00 GMT

Hi Chris,

try attached project

Re: Insert Block into Another Open Drawing

ChrisPicklesimer — Fri, 01 Nov 2013 13:04:34 GMT

Hallex,

Maybe I am missing something but I don't see an attached project. Thanks.

Re: Insert Block into Another Open Drawing

Hallex — Fri, 01 Nov 2013 16:27:51 GMT

Very strange, I sq it this morning,
well then see PM

Re: Insert Block into Another Open Drawing

Hallex — Sat, 02 Nov 2013 09:01:53 GMT

See PM,
Cheers

topic Re: Insert Block into Another Open Drawing in .NET Forum

Insert Block into Another Open Drawing

Re: Insert Block into Another Open Drawing

Re: Insert Block into Another Open Drawing

Re: Insert Block into Another Open Drawing

Re: Insert Block into Another Open Drawing