Remove Dimension Text Bounding Box

[LanloyLisp]

(DEFUN c:test ()
(setq main (CAR (ENTSEL)) e (tblobjname "block" (cdr (assoc 2 (entget main)))) e1 e)
(while (setq e1 (entnext e1))
  (setq eng (entget e1))
  (if (eq (cdr (assoc 0 eng)) "MTEXT")
    (entmod (subst (cons 41 0.)(assoc 41 eng) eng))
    )
  )
  
  (entupd main)
  (princ)
)

Hi Everyone!

 

It's been a while again..  Is there any way we can remove the bounding box of an MText in a Dimension?  Above code works temporarily, but when the object is moved it goes back to its original form.

[pkenewell]

@LanloyLisp Are you referring to the Background Mask? If so - Check out this:

https://www.lee-mac.com/mask.html

[LanloyLisp]

@pkenewell I'm trying to reduce the text's rectangular width of dimensions to keep the background mask highlighting only the text.

[pkenewell]

@LanloyLisp Sorry but I don't think that is possible for normal dimensions. If anything - it would require not only customizing the dimension block, but adding a reactor to the dimensions to maintain the customized elements when doing any modification to them. I'm not sure even if the reactor will work because of creating a circular reference.

 

If someone else is willing to attempt that challenge they are welcome to, but It's way more than I have time for.

[LanloyLisp]

No worries pkenewell. It seems the dimension text is constantly changing handles when edited with its own reactor. We'll see if some other CAD masters may have something to suggest.

[troggarf]

In order to display the text box around dimensions someone probably added a negative sign at the front of the Text Offset in the properties palette.

If you remove the negative, the box will go away.

 

And if anyone wants to have a box around their dimensions.... Add a negative sign to the Text offset...

 

[Danielm103]

or use a negative value with DIMGAP to show the box

[Danielm103]

BTY, overrides are stored in XDATA, here’s a sample in python to clear the overrides.

Though, it’s recommended that you not nuke the whole data. Just clear the inside DSTYLE section

 

docs:

https://help.autodesk.com/view/OARX/2018/ENU/?guid=OREF-Dimension_Style_Overrides

 

should be able to port to lisp

 

import traceback
from pyrx_imp import Rx, Ge, Gi, Db, Ap, Ed

def PyRxCmd_doit() -> None:
    try:
        xd = [(1001, "ACAD"),(1000 , "DSTYLE"), (1002  , "{"),(1002 , "}")]
        db = Db.curDb()
        ids = db.objectIds(Db.Dimension.desc())
        dims = [Db.Dimension(id, Db.OpenMode.kForWrite) for id in ids]
        for dim in dims:
            if dim.hasXData("ACAD"):
                dim.setXData(xd)
    except Exception as err:
        traceback.print_exception(err)

 

Edited May 24 by Danielm103
added docs

[LanloyLisp]

@Danielm103 I think modifying the DSTYLE xdata doesn't affect the ruler width shown above.

@troggarf Turning on and off  the text frame doesn't affect it as well.