Annotative Mleader Background Mask Height toggle

[Anonymous]

Hello All,

I have about 33 sheets of annotative Mleaders that were created at a larger scale than they need to be presented in.  I can select all 400 and set the width to zero to shrink the area that is background masked to the size of the smaller text.  And, I can manually select each, start the text editor and double click the double-arrow or diamond text frame control to fix the mask, but I cannot find a way to edit the height of that mask in bulk.  My coding skills are rough, but I've been over the dxf group codes and the VBA properties for Mleaders and I don't see anything that effectively relates to the results of my manual fix. 

I appreciate your help.

Thanks, 

Dan

[cwr-pae]

Don't think there an external tag for that. Keep all text/multi leaders on their own layer, isolate that layer, edit the mask of one mtext object and match properties selecting everything as target.  Below is a list of most (maybe all) properties of mleaders and mtext.

Mleader properties:

Select object: ; IAcadMLeader: AutoCAD Multi-Leader Interface
; Property values:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 0000000140176558>
;   ArrowheadBlock = ""
;   ArrowheadSize = 0.15
;   ArrowheadType = 0
;   BlockConnectionType = 0
;   BlockScale = 1.0
;   ContentBlockName = ""
;   ContentBlockType = 6
;   ContentType = 2
;   Document (RO) = #<VLA-OBJECT IAcadDocument 000000002a26e9e8>
;   DogLegged = -1
;   DoglegLength = 0.1
;   EntityTransparency = "ByLayer"
;   Handle (RO) = "3783"
;   HasExtensionDictionary (RO) = 0
;   Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 00000000c10bb808>
;   LandingGap = 0.05
;   Layer = "0"
;   LeaderCount (RO) = 1
;   LeaderLineColor = #<VLA-OBJECT IAcadAcCmColor 00000000c10b9b80>
;   LeaderLinetype = "Continuous"
;   LeaderLineWeight = -2
;   LeaderType = 1
;   Linetype = "ByLayer"
;   LinetypeScale = 1.0
;   Lineweight = -1
;   Material = "ByLayer"
;   ObjectID (RO) = 42
;   ObjectName (RO) = "AcDbMLeader"
;   OwnerID (RO) = 43
;   PlotStyleName = "ByLayer"
;   ScaleFactor = 1.0
;   StyleName = "Proposed"
;   TextAttachmentDirection = 0
;   TextBackgroundFill = -1
;   TextBottomAttachmentType = 0
;   TextDirection = 5
;   TextFrameDisplay = -1
;   TextHeight = 0.1
;   TextJustify = 1
;   TextLeftAttachmentType = 4
;   TextLineSpacingDistance = 0.166667
;   TextLineSpacingFactor = 1.0
;   TextLineSpacingStyle = 1
;   TextRightAttachmentType = 4
;   TextRotation = 0.0
;   TextString = "XXX"
;   TextStyleName = "Standard"
;   TextTopAttachmentType = 0
;   TextWidth = 0.0
;   TrueColor = #<VLA-OBJECT IAcadAcCmColor 00000000c10c87c0>
;   Visible = -1

Mtext properties:

Select object: ; IAcadMText: AutoCAD MText Interface
; Property values:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 0000000140176558>
;   AttachmentPoint = 1
;   BackgroundFill = -1
;   Document (RO) = #<VLA-OBJECT IAcadDocument 000000002a26e9e8>
;   DrawingDirection = 5
;   EntityTransparency = "ByLayer"
;   Handle (RO) = "3785"
;   HasExtensionDictionary (RO) = 0
;   Height = 0.1
;   Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 00000000c10c0608>
;   InsertionPoint = (-69.2024 173.042 0.0)
;   Layer = "0"
;   LineSpacingDistance = 0.166667
;   LineSpacingFactor = 1.0
;   LineSpacingStyle = 1
;   Linetype = "ByLayer"
;   LinetypeScale = 1.0
;   Lineweight = -1
;   Material = "ByLayer"
;   Normal = (0.0 0.0 1.0)
;   ObjectID (RO) = 44
;   ObjectName (RO) = "AcDbMText"
;   OwnerID (RO) = 43
;   PlotStyleName = "ByLayer"
;   Rotation = 0.0
;   StyleName = "Standard"
;   TextString = "TEST"
;   TrueColor = #<VLA-OBJECT IAcadAcCmColor 00000000c10ce1c0>
;   Visible = -1
;   Width = 0.0

[cwr-pae]

Also for Mleaders;

 Methods supported:
;   AddLeader ()
;   AddLeaderLine (2)
;   AddLeaderLineEx (1)
;   ArrayPolar (3)
;   ArrayRectangular (6)
;   Copy ()
;   Delete ()
;   GetBlockAttributeValue (1)
;   GetBoundingBox (2)
;   GetDoglegDirection (1)
;   GetExtensionDictionary ()
;   GetLeaderIndex (1)
;   GetLeaderLineIndexes (1)
;   GetLeaderLineVertices (1)
;   GetVertexCount (1)
;   GetXData (3)
;   Highlight (1)
;   IntersectWith (2)
;   Mirror (2)
;   Mirror3D (3)
;   Move (2)
;   RemoveLeader (1)
;   RemoveLeaderLine (1)
;   Rotate (2)
;   Rotate3D (3)
;   ScaleEntity (2)
;   SetBlockAttributeValue (2)
;   SetDoglegDirection (2)
;   SetLeaderLineVertices (2)
;   SetXData (2)
;   TransformBy (1)
;   Update ()

[Anonymous]

---

@cwr-pae wrote:

Don't think there an external tag for that. Keep all text/multi leaders on their own layer, isolate that layer, edit the mask of one mtext object and match properties selecting everything as target.  Below is a list of most (maybe all) properties of mleaders and mtext.

---

Thank you for the reply.  Unfortunately that method did not change the background frame for me.

[pendean]

What you need to edit/fix/alter is unclear: how about a sample DWG file pointing to everything with a before/after view for a few for examples.

TIA

[Anonymous]

---

@pendean wrote:
What you need to edit/fix/alter is unclear: how about a sample DWG file pointing to everything with a before/after view for a few for examples.

TIA

---

new block.dwg has big red background masks that fit nicely at their original 1:30 scale.  But, downsized to 1:20 they cut off eachother and contours and all sorts of useful info.

new blockFixed.dwg has those masks minimized to fit this size of text by double clicking on the text window bar. 

I am through all ~400 on this project now, but I can easily imagine needing to repeat this task, and I would still appreciate any more automated resolutions anyone might have.

Thanks,
Dan

[S.Faris · Accepted solution]

Select all the Annotative Mleader that you want to correct the Mask of, and go to

properties -> Under Text, change the value of width to something non-zero(eg:0.00001)

Now this will resolve the issue for any annotative scale you want to change to .

[Anonymous]

That did it! Thanks so much. 

---

@S.Faris wrote:

Select all the Annotative Mleader that you want to correct the Mask of, and go to

properties -> Under Text, change the value of width to something non-zero(eg:0.00001)

Now this will resolve the issue for any annotative scale you want to change to .

---

[glenn.fukumitsu]

Thank you as well, worked beautifully.

[PJohnSmits]

My AutoCAD Lt 2021 has the text width fixed in Properties and I don't find how to fix that.