Description

Returns the default paragraph status of the text being edited

Available in Ted and in Fred.

Syntax

object

Required. Object name. Returned by Ted.GetActiveTxt.

Example

  If Ted.HasActiveTxt Then

    Dim objTxt = Ted.GetActiveTxt

    Dim objDefaultPS = objTxt.DefaultParaStatus

    Dim hLeading = objDefaultPS.Leading

    Dim objDefaultTS = objTxt.DefaultTextStatus

    Dim hSize = objDefaultTS.CharH

     MsgBox("Leading=" & hLeading & " Point size=" & hSize)

  End If

Context

Text object

See also

GetDefaultTextStatus Method