Description
The margins for entire table.
Syntax
object.TableMargin(iSide) [ =mValue ] |
object
Required. Object name, returned by Text.GetNewTable or Text.GetCurTable.
iSide
0=left, 1=right, 2=position of horizontal rules
If objTable.TableMargin(2) = 0 or omitted, the horizontal rules are drawn "between" two rows (half rule on the parent row, half rule on the row below the parent one); if objTable.TableMargin(2) = 1, the entire rule is drawn within parent row. This allows cell fill to cover the entire cell bounding box and not only the inside rules part. This new option is strongly suggested when fills and dashing are heavily used in the table definition.
mValue
Margin, or 0 or 1 in case of objTable.TableMargin(2).
Remarks
Example
This script creates a new table with 4 columns and 8 rows, with 0.5pt rules between the tabulation columns, and with margins of entire table of 3000mpt left and right.
Dim objNewTable = Text.GetNewTable
objNewTable.NColumns = 4
objNewTable.NRows = 8
objNewTable.VRuleWidth = 500
objNewTable.TableMargin(0) = 3000
objNewTable.TableMargin(1) = 3000
objNewTable.TableMargin(2) = 1
Text.InsTable (objNewTable)