Leader and arrowhead

[Anonymous]

Does anybody know how to set leader arrow head like "_dot".

I have:

  Using acTrans As Transaction = acData.TransactionManager.StartTransaction()
                '' Open the Block table for read
                acBlkTbl = acTrans.GetObject(acData.BlockTableId, OpenMode.ForRead)
                acBlkTblRec = acTrans.GetObject(acBlkTbl(BlockTableRecord.ModelSpace), OpenMode.ForWrite)
                Dim lead As Leader = New Leader()


                lead.SetDatabaseDefaults()
                lead.AppendVertex(New Point3d(l_poi(0), l_poi(1), 0))
                lead.AppendVertex(New Point3d(l_poi(2), l_poi(3), 0))
                lead.HasArrowHead = True

                'lead.Dimldrblk = "_DOT"

                lead.Dimasz = 45
                lead.Dimscale = 1
                lead.Dimclrd = Color.FromRgb(255, 0, 63)
                lead.Layer = "flashing"
                lead.LinetypeScale = 1
                acBlkTblRec.AppendEntity(lead)
                acTrans.AddNewlyCreatedDBObject(lead, True)
                acTrans.Commit()
                acTrans.Dispose()
            End Using

[Hallex]

Try this code, not sure about if this will be work with your settings

http://www.acadnetwork.com/topic-254.msg451.html#msg451&gsc.tab=0

[DiningPhilosopher]

The site you're pointing others to requires them to register in order to do nothing more than view the contents,.

No thanks.