Object: SpiderShapeObject
- Updated2024-09-12
- 1 minute(s) read
(Collections | Spider) > SpiderCurves > SpiderCurve > Object: SpiderShapeObject
Object: SpiderShapeObject
The SpiderShapeObject object provides the curve properties of a spider axis system in DIAdem REPORT.
The SpiderShapeObject object corresponds to one of the following objects:
| SpiderLine (IRepSpiderShapeObjLineInt) | Line |
| SpiderLineAndPoints (IRepSpiderShapeObjLineAndPointsInt) | Line and points |
The following example generates a spider axis system with a Line type curve:
| VBScript | Python |
Dim oMyAxisSystem, oMyPos, oMyCurve, oMySpiderLineSettings, oMySpiderSettings Call Report.NewLayout() Call Data.Root.Clear() Call DataFileLoad("Example.tdm","TDM","") Set oMyAxisSystem = Report.ActiveSheet.Objects.Add(eReportObjectSpider, "MySpiderAxisSystem") Set oMyPos = oMyAxisSystem.Position.ByCoordinate oMyPos.X1 = 20 oMyPos.X2 = 80 oMyPos.Y1 = 20 oMyPos.Y2 = 80 Set oMySpiderSettings = oMyAxisSystem.Settings oMySpiderSettings.DisplayMode = eSpiderDisplayModeSpider oMySpiderSettings.ShowBorder = True oMySpiderSettings.BorderLine.Color.ColorIndex = eColorIndexDarkRed oMySpiderSettings.BackgroundColor.ColorIndex = eColorIndexYellow oMySpiderSettings.AngleDirection = eAngleDirectionClockwise Set oMyCurve = oMyAxisSystem.CurvesSpider.Add(eSpiderShapeLine, "MySpiderCurve") oMyCurve.Shape.Channel.Reference = "[5]/[3]" Call Report.Refresh()