![]() | DIAdem 2017 Help |
![]() | DIAdem 2018 Help |
![]() | DIAdem 2019 Help |
![]() | DIAdem 2020 Help |
![]() | DIAdem 2020 SP1 Help |
The Frame object provides a rectangle in DIAdem REPORT.
The following example adds a rectangle to the current worksheet, changes the rectangle display, and then exports the rectangle to the graphics file MyFrame.png:
Dim oMyFrame, oMyBackgroundColor, oMyBorderLineColor, oMyShadowColor Call Report.NewLayout() Set oMyFrame = Report.ActiveSheet.Objects.Add(eReportObjectFrame,"MyFrame") oMyFrame.ForceSquare = True Set oMyBackgroundColor = oMyFrame.BackgroundColor Call oMyBackgroundColor.SetPredefinedColor(eColorIndexRed ) oMyBackgroundColor.Transparency = 50 oMyFrame.Position.ByCoordinate.X1 = 10 oMyFrame.Position.ByCoordinate.X2 = 40 oMyFrame.Position.ByCoordinate.Y1 = 50 oMyFrame.Position.ByCoordinate.Y2 = 80 Set oMyBorderLineColor = oMyFrame.BorderLine.Color Call oMyBorderLineColor.SetPredefinedColor(eColorIndexGreen) oMyFrame.BorderLine.LineType = eLineTypeDotted oMyFrame.BorderLine.Width = eLineWidth0140 Set oMyShadowColor = oMyFrame.Shadow.Color Call oMyShadowColor.SetPredefinedColor(eColorIndexBlue) oMyFrame.Shadow.Direction = eShadowDirectionLeftBottom oMyFrame.Shadow.OffsetX = 1 oMyFrame.Shadow.OffsetY = 2 Call oMyFrame.ExportToImage("D:\MyFrame",eImageExportTypePNG)
BackgroundColor | BorderLine | ForceSquare | Index | IsSelected | Name | ObjectType | Position | Shadow | TagStored | TagTemporary
ReportObjects.Add | ReportObjects.Copy | ReportObjects.Item | SelectedObjects.Item | ToolTipFrameContext.Frame
Helpful
Not Helpful