Object: FillEffects
- Updated2024-09-12
- 2 minute(s) read
(2DFilledAreaSettings | 2DLineAndPointsSettings | 2DLineSettings | 2DOutlineBarsHorizontalSettings | 2DOutlineBarsSettings | 2DSpecialCombinationSettings | SpiderLineAndPointsSettings | SpiderLineSettings) > Object: FillEffects
Object: FillEffects
The FillEffects object provides the properties of the curve filling in a 2D axis system in DIAdem REPORT.
The following example generates a 2D axis system with a filled curve and specifies the curve parameters:
| VBScript | Python |
Dim oMy2DAxisSystem, oMyCurve, oMyPos, oMyShape, oMySettings, oMyFillEffect Call Data.Root.Clear() Call DataFileLoad(DataReadPath & "Report_Data.tdm","TDM","") Call Report.NewLayout() Set oMy2DAxisSystem = Report.ActiveSheet.Objects.Add(eReportObject2DAxisSystem, "My2DAxisSystem") Set oMyPos = oMy2DAxisSystem.Position.ByCoordinate oMyPos.X1 = 20 oMyPos.X2 = 80 oMyPos.Y1 = 20 oMyPos.Y2 = 80 Set oMyCurve = oMy2DAxisSystem.Curves2D.Add(e2DShapeFilledArea, "MyCurve") Set oMyShape = oMyCurve.Shape oMyShape.XChannel.Reference = "[2]/[1]" oMyShape.YChannel.Reference = "[2]/[2]" oMyShape.YChannelDifferential.Reference = "[2]/[3]" Set oMySettings = oMyShape.Settings Call oMySettings.Line.Color.SetPredefinedColor(eColorIndexBlue) oMySettings.Line.Width = eLineWidth0100 Set oMyFillEffect = oMySettings.FillEffects Call oMyFillEffect.Color.SetFillingColor(255,0,eColorGradientDiagonalRight,eColorGradientModeFromInside) oMyFillEffect.Pattern = eFillPatternLeftDiagonal Call Report.Refresh()
Properties
Color | GradientMode | Pattern | PatternType
Returned From
2DFilledAreaSettings.FillEffects | 2DLineAndPointsSettings.FillEffects | 2DLineSettings.FillEffects | 2DOutlineBarsHorizontalSettings.FillEffects | 2DOutlineBarsSettings.FillEffects | 2DSpecialCombinationSettings.FillEffects | SpiderLineAndPointsSettings.FillEffects | SpiderLineSettings.FillEffects