Previous Document Next Document

Object Model Reference : Classes : T : TextFrame : Properties : TextFrame.Empty


TextFrame.Empty

Property Empty As Boolean

Description

Member of TextFrame

The Empty property returns True if a paragraph-text frame is empty.

The Empty property returns a read-only value.

VBA example

The following VBA example links frames of paragraph text together and displays which frames are empty.

Sub Test()
 Dim s As Shape
 Dim s1 As Shape
 Dim s2 As Shape
 Dim t As Text
 Dim f As TextFrame
 Dim d As Document
 Dim st As String
 Set d = CreateDocument
 Set s = d.ActiveLayer.CreateParagraphText(2, 2, 5, 5, String$(1000, "Z"))
 Set s1 = d.ActiveLayer.CreateParagraphText(5, 5, 8, 8)
 Set s2 = d.ActiveLayer.CreateParagraphText(8, 8, 10, 10)
 Set t = s.Text
 ' Link the frames together
 t.Frame.LinkTo s1
 s1.Text.Frame.LinkTo s2
 For Each f In t.Frames
  If f.Empty Then
   st = st & "Frame " & f.Index & vbCr
  End If
 Next f
 MsgBox st
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.