Object: ObjectPositionDefinedByCoordinates

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

The ObjectPositionDefinedByCoordinates object provides the coordinates for the position of the object in DIAdem REPORT. Because you can use either the Bottom, Height, Left, Right, Top, and Width for the ObjectPositionDefinedByBorders property, or the Height, Width, X1, X2, Y1, and Y2 for the ObjectPositionDefinedByCoordinates property to specify the position, these properties impact each other and the value of the property set first can be modified by another property.

The following example generates a formula graphic and uses the formula graphic to position the coordinates of the corner points. Then the example generates a frame and positions the frame over the coordinates of the left bottom corner and the height and width:

Dim oMyFormula, oMyPosFormula, oMyFrame, oMyPosFrame
Call Report.NewLayout()
Set oMyFormula = Report.ActiveSheet.Objects.Add(eReportObjectFormulaDisplay ,"MyFormular")
Set oMyPosFormula = oMyFormula.Position.ByCoordinate
oMyFormula.Text = "a^2+b^2=c^2"
oMyPosFormula.X1 = 10
oMyPosFormula.X2 = 30
oMyPosFormula.Y1 = 10
oMyPosFormula.Y2 = 25
Set oMyFrame = Report.ActiveSheet.Objects.Add(eReportObjectFrame,"MyFrame")
Set oMyPosFrame = oMyFrame.Position.ByCoordinate
oMyPosFrame.X1 = 40
oMyPosFrame.Width = 20
oMyPosFrame.Y1 = 10
oMyPosFrame.Height = 15
Call Report.Refresh()