![]() | DIAdem 2017 Help |
![]() | DIAdem 2018 Help |
![]() | DIAdem 2019 Help |
![]() | DIAdem 2020 Help |
![]() | DIAdem 2020 SP1 Help |
The ObjectPositionDefinedByBorders object provides the distances 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 edge distances to position the formula graphic. Then the example generates a frame and positions the frame over the distances to 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.ByBorder oMyFormula.Text = "a^2+b^2=c^2" oMyPosFormula.Left = 10 oMyPosFormula.Right = 70 oMyPosFormula.Bottom = 10 oMyPosFormula.Top = 75 Set oMyFrame = Report.ActiveSheet.Objects.Add(eReportObjectFrame,"MyFrame") Set oMyPosFrame = oMyFrame.Position.ByBorder oMyPosFrame.Left = 40 oMyPosFrame.Width = 20 oMyPosFrame.Bottom = 10 oMyPosFrame.Height = 15 Call Report.Refresh()
Helpful
Not Helpful