EffectTextOnPath.Placement property - Developer Area

API Documentation > CorelDRAW > X8 > EffectTextOnPath > IVGEffectTextOnPath

EffectTextOnPath.Placement property

Gets or sets the text placement of type cdrFittedPlacement

Syntax:

Property Get Placement() As cdrFittedPlacement
Property Let Placement(ByVal Value As cdrFittedPlacement)

Remarks:

The Placement property returns or specifies the placement of text on an open curve.

This property returns a value of cdrFittedPlacement.

See also the EffectTextOnPath.Quadrant property.

Examples:

The following VBA example places the text in the middle of a curve.

Sub Test()
  Dim sText As Shape, sPath As Shape
  Set sText = ActiveLayer.CreateArtisticText(0, 0, "Some Text")
  Set sPath = ActiveLayer.CreateCurveSegment(0.6, 4.5, 5, 5.5, 3, 80, 3, -100)
  sText.Text.FitToPath sPath
  sText.Effects(1).TextOnPath.Placement = cdrCenterPlacement
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25