Object: ObjectPosition

Object: ObjectPosition

The ObjectPosition object provides the position of objects 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 coordinates of the corner points to position the formula graphic:

Dim oMyFormula, oMyPosFormula
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
Call Report.Refresh()

dd.Report.NewLayout() 
oMyFormula = dd.Report.ActiveSheet.Objects.Add(dd.eReportObjectFormulaDisplay ,"MyFormular") 
oMyPosFormula = oMyFormula.Position.ByCoordinate 
oMyFormula.Text = "a^2+b^2=c^2" 
oMyPosFormula.X1 = 10 
oMyPosFormula.X2 = 30 
oMyPosFormula.Y1 = 10 
oMyPosFormula.Y2 = 25 
dd.Report.Refresh()