Object: ColorLegendHeader

DIAdem 2018 Help


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

DOWNLOAD (Windows Only)


DIAdem 2015 Help
DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help

The ColorLegendHeader object provides the title properties of a color legend in DIAdem REPORT.

The following example generates a 2D curve and displays the associated color legend with a title:

Dim oMy2DAxisSystem, oMyPosition, oMyCurve, oMyShape, oMyLegend, oMyAnchor, oMyLegendHeader
Call Report.NewLayout()
Set oMy2DAxisSystem = Report.ActiveSheet.Objects.Add(eReportObject2DAxisSystem, "My2DAxisSystem")
Set oMyPosition = oMy2DAxisSystem.Position.ByCoordinate
oMyPosition.X1 = 10
oMyPosition.X2 = 70
oMyPosition.Y1 = 10
oMyPosition.Y2 = 70
Set oMyCurve = oMy2DAxisSystem.Curves2D.Add(e2DShapeLine, "MyNew2DCurve1")
oMyCurve.Shape.XChannel.Reference = "[1]/[1]"
oMyCurve.Shape.YChannel.Reference = "[1]/[2]"
oMyCurve.Shape.Settings.Line.Color.ColorIndex = eColorIndexPalette
Set oMyLegend = oMy2DAxisSystem.ColorLegend
oMyLegend.Visible = True
Set oMyAnchor = oMyLegend.Position.Anchor
oMyAnchor.PageRelatedX = 70
oMyAnchor.PageRelatedY = 10
Set oMyLegendHeader = oMyLegend.Header
oMyLegendHeader.ShowGrid = True
oMyLegendHeader.PortionHeaderField = 5
oMyLegendHeader.Title = "Legend Title"
Call Report.Refresh()

Returned From

ColorLegend.Header

WAS THIS ARTICLE HELPFUL?

Not Helpful