IWxStyle.TextFontStyleBold

Syntax

TextFontStyleBold: Boolean;

TextFontStyleBold: boolean;

Description

The TextFontStyleBold property determines whether to use bold font. If the value is True, bold font is used, if the value is False, it is not used.

The default property value is False.

Example

Executing the example requires that repository contains a workspace with the IWSTYLE identifier containing shape.

Add links to the Andy, Drawing, Metabase system assemblies.

Sub UserProc;
Var
    mb: IMetabase;
    ws: IWxWorkspace;
    Shape: IWxShape;
    Style: IWxStyle;
Begin
    // Get workspace for edit
    mb := MetabaseClass.Active;
    ws := mb.ItemById("IWSTYLE").Edit As IWxWorkspace;
    ws.BeginUpdate;
    Shape := ws.Shapes.Item(0);
    Shape.Text := "Text";
    Style := Shape.Style;
    Style.TextFontSize := 12;
    Style.TextFontBrushColor := GxColor.FromName("Red");
    Style.TextFontStyleBold := True;
    ws.EndUpdate;
    (ws As IMetabaseObject).Save;
End Sub UserProc;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Drawing;

 
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    ws: IWxWorkspace;
    Shape: IWxShape;
    Style: IWxStyle;
    Color: GxColorClassClass = 
New GxColorClassClass();
Begin
    
// Get workspace for edit
    mb := Params.Metabase;
    ws := mb.ItemById[
"IWSTYLE"].Edit() As IWxWorkspace;
    ws.BeginUpdate();
    Shape := ws.Shapes.Item[
0];
    Shape.Text := 
"Text";
    Style := Shape.Style;
    Style.TextFontSize := 
12;
    Style.TextFontBrushColor := Color.FromName(
"Red");
    Style.TextFontStyleBold := 
True;
    ws.EndUpdate();
    (ws 
As IMetabaseObject).Save();
End Sub;

After executing the example an object contains text of defined color, size and of bold font.

See also:

IWxStyle