IsPrivate: Boolean;
The IsPrivate property determines whether a private style is used. If the property is set to True, the style is not displayed in the style list, if the value is False, it is displayed in the list.
The default property value is True.
Executing the example requires an existing ws object of the IWxWorkspace type.
Sub UserProc;
Var
Ws : IWxWorkspace;
style : IWxStyle;
Begin
style := Ws.CreateStyle;
style.Id := "New_Style";
style.IsPrivate := False;
style.BackgroundBrushForeColor := GxColor.FromName("Red");
style.ShadowBrushForeColor := GxColor.FromName("Yellow");
style.TextAlignmentHorizontal := GxAlignment.Far;
End Sub UserProc;
After executing the example the added style is displayed in the styles collection.
See also: