API Documentation > CorelDRAW > 2025-v26 > Shape > IVGShape
Shape.WrapText property
Returns or sets whether overlaying text will wrap around the shape
Syntax:
Property Get WrapText() As cdrWrapStyle
Property Let WrapText(ByVal Value As cdrWrapStyle)
Remarks:
The WrapText property returns or specifies a style when wrapping paragraph text.
Examples:
The following VBA example wraps the paragraph text around the ellipse.
Sub Test()
Dim ell As Shape
ActiveLayer.CreateParagraphText 1, 1, ActivePage.SizeWidth - 1, _
  ActivePage.SizeHeight - 1, String$(2000, "a"), , , , 24
Set ell = ActiveLayer.CreateEllipse(2, 9, 6, 4)
ell.WrapText = cdrWrapContourStraddle 
End Sub