Object: ObjectPositionXY

DIAdem 2018 Help


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

DOWNLOAD (Windows Only)


DIAdem 2015 Help
DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help

The ObjectPositionXY object provides the position of a text in DIAdem REPORT.

The following example generates a text that is rotated by 45 degrees:

Dim oMyText, oMyFont, oMyPosition
Call Report.NewLayout()
Set oMyText = Report.ActiveSheet.Objects.Add(eReportObjectText,"MyText")
oMyText.Text = "This is a text"
Set oMyPosition = oMyText.PositionXY
oMyPosition.RelativePosition = eRelativePositionRightTop
oMyPosition.X = 10
oMyPosition.Y = 20
oMyPosition.Angle = 45
Set oMyFont = oMyText.Font
Call oMyFont.Color.SetPredefinedColor(eColorIndexBlue)
oMyFont.Name = "Tahoma"
oMyFont.Size = 10
oMyFont.Border = True
Call Report.Refresh()

Properties

Angle | RelativePosition | X | Y | ZOrder

Returned From

Text.PositionXY

WAS THIS ARTICLE HELPFUL?

Not Helpful