Description
Returns the height of the object expressed in millipoints.
This value is valid only for pictures - the function returns 0 for any other kind of object.
Syntax
lngHeight = object.Height |
object
Required. Object name. Returned by the GetObj function of the object, returned by Ted.GetActiveArticle.
Example
This script displays the height of the object.
If Ted.HasActiveArticle Then
Dim objArticle = Ted.GetActiveArticle
Dim idx As Integer = objArticle.GetCurTxtIdx
If idx >= 0 Then
If objArticle.HasRefObj(idx) Then
Dim objObj = objArticle.GetRefObj(idx)
MsgBox(objObj.height)
End If
End If
End If
Context