Object: 3DPlaneYZBackgroundImageScaling

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)


DIAdem 2012 Help
DIAdem 2014 Help
DIAdem 2015 Help
DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help

The 3DPlaneYZBackgroundImageScaling object provides the scaling properties of a background graphic of the yz-plane in a 3D axis system, in DIAdem REPORT.

The following example generates a 3D axis system with a curve and a background graphic in the yz-plane:

Dim oMy3DAxisSystem, oMy3DCurve, oMyPos, oMySettings, oMyBackground, oMyScaling
Report.NewLayout
Call Data.Root.Clear()
Call DataFileLoad(DataReadPath & "Report_Data.tdm","TDM","")
Set oMy3DAxisSystem = Report.ActiveSheet.Objects.Add(eReportObject3DAxisSystem,"My3DAxisSystem")
Set oMy3DCurve = oMy3DAxisSystem.Curves3D.Add(e3DShapeSurface, "MyNew3DCurve")
Set oMyPos = oMy3DAxisSystem.Position.ByCoordinate
oMyPos.X1 = 20
oMyPos.X2 = 80
oMyPos.Y1 = 20
oMyPos.Y2 = 80
oMy3DCurve.Shape.XChannel.Reference = "[2]/[1]"
oMy3DCurve.Shape.YChannel.Reference = "[2]/[2]"
oMy3DCurve.Shape.ZChannel.Reference = "[2]/[3]"
Set oMySettings = oMy3DAxisSystem.Settings
Set oMyBackground = oMySettings.PlaneYZ.BackgroundImage
oMyBackground.FileName = "Example1.png"
Set oMyScaling = oMyBackground.Scaling 
oMyScaling.Enable = True
oMyScaling.YBegin = 0.2
oMyScaling.YEnd = 0.8
oMyScaling.ZBegin = -0.5
oMyScaling.ZEnd = 0
Call Report.Refresh()

Properties

Enable | YBegin | YEnd | ZBegin | ZEnd

WAS THIS ARTICLE HELPFUL?

Not Helpful