WHAT IS THE CODE TO SET THE FONT STYLE, FONT HEIGHT, FONT WIDTH, FONT COLOR IN MICROSTATION ?
I am trying to set the font while fetching the data from the design and pasting in particular template.
Can someone please help me through this.
Find the piece of code which i have tried but its not working. Any other options or some code which i can try?
**********************CODE***********************************
point.X = startPoint.X point.Y = startPoint.Y point.Z = startPoint.Z point2.X = point.X + 45 point2.Y = point.Y + 3.8 point2.Z = point.Z CadInputQueue.SendDragPoints point, point2, 1 CadInputQueue.SendCommand "CLIPBOARD COPY" MicroStationDGN.OpenDesignFile FDFdFdFile, False, msdV7ActionUpgradeToV8 CadInputQueue.SendCommand "FIT VIEW EXTENDED 1" CadInputQueue.SendCommand "SCALE ICON" CadInputQueue.SendCommand "ACTIVE XSCALE 1.0000" CadInputQueue.SendCommand "ACTIVE SCALE" CadInputQueue.SendCommand "ACTIVE YSCALE 1.0000" CadInputQueue.SendCommand "ACTIVE SCALE" CadInputQueue.SendCommand "TEXTSTYLE ACTIVE ROMANS" CadInputQueue.SendCommand "TEXTSTYLESET ColorValue ""7"" ""ROMANS""" CadInputQueue.SendCommand "TEXTSTYLESET Height " & Str(5) & "ROMANS""" CadInputQueue.SendCommand "TEXTSTYLE ACTIVE" CadInputQueue.SendCommand "TEXTSTYLESET WIDTH 5" CommandState.StartDefaultCommand
The font family of text is set with the print family property.
A print property must contain a number of font names as an “alternative” system. If the source is not supported by the browser, try the next source, and so on.
Start with the print you want and have a generic family, allowing the browser to choose a similar typeface in the generic family, if no other fonts are available.
Note: If there is more than one word in a print family, it must be in quotes, for example: "Times New Roman."