Description

Returns true if the Add property has a value.

Syntax

object

Required. Object name, returned by Text.GetTableRow

Example

 

This script uses the HasAdd function to find out if it is possible to increment the maximum vertical space that can be added above the tabulation row when vertically justifiyng the whole text for 1pt.

Dim objTableRow Text.GetTableRow

if objTableRow.HasAdd then

 objTableRow.Add = objTableRow.Add + 1000

end if

Text.SetTableRow (objTableRow)