Object: Circle
- Updated2024-09-12
- 1 minute(s) read
(ReportObjects | SelectedObjects) > Object: Circle
Object: Circle
The Circle object provides a circle in DIAdem REPORT.
The following example adds a circle to the current worksheet, changes the display of the circle, and then exports the circle into the graphics file MyCircle.png:
| VBScript | Python |
Dim oMyCircle, oMyBackgroundColor, oMyBorderLineColor Call Report.NewLayout() Set oMyCircle = Report.ActiveSheet.Objects.Add(eReportObjectCircle,"MyCircle") oMyCircle.ForceCircle = True Set oMyBackgroundColor = oMyCircle.BackgroundColor Call oMyBackgroundColor.SetPredefinedColor(eColorIndexRed ) oMyBackgroundColor.Transparency = 50 oMyCircle.Position.ByCoordinate.X1 = 10 oMyCircle.Position.ByCoordinate.X2 = 40 oMyCircle.Position.ByCoordinate.Y1 = 50 oMyCircle.Position.ByCoordinate.Y2 = 80 Set oMyBorderLineColor = oMyCircle.BorderLine.Color Call oMyBorderLineColor.SetPredefinedColor(eColorIndexGreen) oMyCircle.BorderLine.LineType = eLineTypeDotted oMyCircle.BorderLine.Width = eLineWidth0140 Report.Settings.ImageExport.PNG.BitsPerPixel = ePNGBitsPerPixelRGB24 Report.Settings.ImageExport.PNG.Height = 300 Report.Settings.ImageExport.PNG.UseRatio = True Call oMyCircle.ExportToImage(LayoutWritePath & "MyCircle", eImageExportTypePNG)
Properties
BackgroundColor | BorderLine | ForceCircle | Index | IsSelected | Name | ObjectType | Position | TagStored | TagTemporary
Methods
Returned From
ReportObjects.Add | ReportObjects.Copy | ReportObjects.Item | SelectedObjects.Item | ToolTipCircleContext.Circle