Shape.IsOnShape method - Developer Area

API Documentation > CorelDRAW > 2020 > Shape > IVGShape

Shape.IsOnShape method

Finds if the given coordinates are 'inside', 'outside' or on the margins of the curve

Syntax:

Function IsOnShape(ByVal x As Double, ByVal y As Double, Optional ByVal HotArea As Double = -1) As cdrPositionOfPointOverShape

Parameters:

Name	Type	Description
x	Double	Specifies the horizontal position of the point in the active document
y	Double	Specifies the vertical position of the point in the active document
HotArea	Double	Specifies the tolerance radius in which to evaluate the presence of the shape.

Remarks:

The IsOnShape method determines whether a given point lies inside a shape or on its outline.

This method returns cdrPositionOfPointOverShape.

Examples:

The following VBA example lets the user click anywhere in the document and determine whether any shape's outline or fill area was clicked. If so, the color of the outline or fill is changed to yellow. This script runs until Esc is pressed.

Sub Test()
  Dim s As Shape
  Dim x As Double, y As Double
  While ActiveDocument.GetUserClick(x, y, 0, 100, False, cdrCursorPickOvertarget) = 0
    For Each s In ActivePage.Shapes
      Select Case s.IsOnShape(x, y)
        Case cdrOnMarginOfShape
          If s.Outline.Type = cdrOutline Then
            s.Outline.Color.RGBAssign 255, 255, 0
            Exit For
          End If
        Case cdrInsideShape
          s.Fill.UniformColor.RGBAssign 255, 255, 0
          Exit For
      End Select
    Next s
  Wend
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