Margins(Index: TabMargin): Double;
Index is the border from which the margin is defined.
The Margins property determines text margins in a table cell in millimeters.
aExecuting the example requires a form with the Button1 button located on it, the TabSheetBox component and the UiTabSheet component named UiTabSheet1. UiTabSheet1 is the data source for the TabSheetBox component.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
TSheet: ITabSheet;
TRange: ITabRange;
Style: ITabCellStyle;
Begin
TSheet := UiTabSheet1.TabSheet;
TRange := TSheet.View.Selection.Range;
Style := TRange.Style;
Style.Margins(TabMargin.Bottom) := 1;
Style.Margins(TabMargin.Left) := 1;
Style.Margins(TabMargin.Right) := 1;
Style.Margins(TabMargin.Top) := 1;
End Sub Button1OnClick;
Click the button to change text margins for a selected cell range. All margins are equal to 1 millimeter.
See also: