.NET

Reply
Mentor
wang890
Posts: 827
Registered: ‎06-08-2007
Message 1 of 3 (496 Views)

change font in mtext

496 Views, 2 Replies
01-24-2012 11:21 AM

i have 26000 mtext that has overridden font inside the property. set to bold and print out look like crap.

 

see attached i want all the text to look like the text on the left. right is what they look like now. i just copied a few as an example.

 

can't find the font property in the mtext object:

 

PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesButton1.Click

 

Dim doc AsDocument = Application.DocumentManager.MdiActiveDocument

 

Dim db AsDatabase = doc.Database

 

'Dim id As ObjectIdDim ed AsEditor = doc.Editor

 

Dim oBlock As BlockReference = NothingDim tv() As TypedValue = {NewTypedValue(DxfCode.Start, TextBox1.Text)}

 

', New TypedValue(DxfCode.LayerName, "Layer1")}Dim selFilter AsNewSelectionFilter(tv)

 

Dim ss AsSelectionSet = ed.SelectAll(selFilter).Value

 

Using trans AsTransaction = db.TransactionManager.StartTransaction()

 

TryDim bt AsBlockTable = trans.GetObject(db.BlockTableId, OpenMode.ForWrite)

 

ForEach selObj As SelectedObject Inss

 

'trans.GetObject(selObj.ObjectId, OpenMode.ForWrite).Erase()Dim oText As MText = CType(trans.GetObject(selObj.ObjectId, OpenMode.ForWrite), MText)

 

Next

trans.Commit()

Catch'ex As Exception' MsgBox("Error: " + ex.Message)EndTryEndUsingEndSub

Civil 3D 2012
Work: Xeon W3503, 12GB, Quadro 2000, Yamakasi Sparta 301 + Dell PH2211
Home: 3930k, 12GB, GTX 590, U3011, QX2710
*Expert Elite*
chiefbraincloud
Posts: 753
Registered: ‎02-13-2008
Message 2 of 3 (483 Views)

Re: change font in mtext

01-24-2012 12:50 PM in reply to: wang890

The font is specified (or overridden) in the Content of the Mtext.  In your example drawing you will see that the beginning of the Content is "\Fbold.shx;"

Dave O.                                                                  Sig-Logos32.png
Mentor
tyronebk
Posts: 178
Registered: ‎08-17-2007
Message 3 of 3 (481 Views)

Re: change font in mtext

01-24-2012 12:58 PM in reply to: wang890
If you want to remove the formatting overrides from MText you should just be able to set the:
MText.Contents = MText.Text

The Contents string holds all the text and formatting. Text just hold the text contents.

If the above removes too much of the formatting you may have to parse the Contents string and remove any of the unwanted formatting strings (in this case it is probably just the "\Fbold.shx;" at the start of the Contents string).

Edit: Removed extra slash.
Need installation help?

Start with some of our most frequented solutions or visit the Installation and Licensing Forum to get help installing your software.