IsPrivate: Boolean;
Свойство IsPrivate определяет признак частного стиля. В случае если свойство имеет значение True, то стиль не будет отображен в списке стилей, при значении False - будет отображен в данном списке.
По умолчанию свойство имеет значение True.
В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.
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;
После выполнения примера добавленный стиль будет отображен в коллекции стилей.
См. также: