.NET
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic to the Top
- Bookmark
- Subscribe
- Printer Friendly Page
change font in mtext
- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content
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
Work: Xeon W3503, 12GB, Quadro 2000, Dell 19' x 2
Home: 3930k, 16GB, GTX 590, Dell U3011
Re: change font in mtext
- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content
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;"

Re: change font in mtext
- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content
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.

