Property: Position for Circle

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)

DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help
DIAdem 2020 SP1 Help

Specifies the position of a circle in a DIAdem REPORT worksheet.

Set oObjectPosition = Object.Position
ObjectCircle
Object with this property
oObjectPositionObjectPosition
Returned object

The following example generates a circle and specifies the position of this circle:

Copy script

Dim oMyCircle, oMyBackgroundColor, oMyPosition, oMyBorderLine
Call Report.NewLayout()
Set oMyCircle = Report.ActiveSheet.Objects.Add(eReportObjectCircle,"MyCircle")
oMyCircle.ForceCircle = True
Set oMyBackgroundColor = oMyCircle.BackgroundColor
Call oMyBackgroundColor.SetPredefinedColor(eColorIndexRed )
Set oMyPosition = oMyCircle.Position.ByCoordinate
oMyPosition.X1 = 10
oMyPosition.X2 = 40
oMyPosition.Y1 = 50
oMyPosition.Y2 = 80
Set oMyBorderLine = oMyCircle.BorderLine
Call oMyBorderLine.Color.SetPredefinedColor(eColorIndexGreen)
oMyBorderLine.LineType = eLineTypeDotted
oMyBorderLine.Width = eLineWidth0140
Call Report.Refresh()

See Also

Objects Overview

WAS THIS ARTICLE HELPFUL?

Not Helpful