Jump to content
Software FX Community

Serial Legend Titles Overlap


User (Legacy)

Recommended Posts

Posted

When trying to restrict the amount of space the series legend uses (through

using WordBreak, AutoSize=false, etc.), the titles appear to overlap each

other. This occurs when a title is more than 1 line long.

If I set the Serial Legend Box Obj's alignment to spread, the titles display

fine. I would like them to appear at the top of the page, though.

Enclosed is a pic and the source used to set these attributes.

Thanks in advance.

Tim

'* set type of chart and look

ChartPie.Gallery = SoftwareFX.ChartFX.Gallery.Pie

ChartPie.Chart3D = True

'* set text attributes

ChartPie.Titles(0).LineGap = 15

ChartPie.Titles(0).DrawingArea = False

ChartPie.Titles(0).Font = New Font("Arial", 9)

'* display labels outside pie and hide lines

ChartPie.PointLabels = True

Dim m_Pie As SoftwareFX.ChartFX.Internet.Server.GalleryObj.Pie

m_Pie = ChartPie.GalleryObj

m_Pie.LabelsInside = False

m_Pie.ShowLines = False

'* display and place the legend

ChartPie.SerLegBox = True

ChartPie.SerLegBoxObj.Docked = SoftwareFX.ChartFX.Docked.Left

ChartPie.SerLegBoxObj.ToolBorder = SoftwareFX.ChartFX.ToolBorder.External

ChartPie.SerLegBoxObj.AutoSize = False

ChartPie.SerLegBoxObj.Width = 140

ChartPie.SerLegBoxObj.Alignment = SoftwareFX.ChartFX.ToolAlignment.Near

ChartPie.SerLegBoxObj.Flags = SoftwareFX.ChartFX.LegendBoxFlag.WordBreak

ChartPie.SerLegBoxObj.SizeToFit()

ChartPie.SerLegBoxObj.Invalidate()

ChartPie.Width = New Unit(425)

ChartPie.Height = New Unit(250)

'* data

ChartPie.SerLegBoxObj.DrawingArea = False

ChartPie.Titles(0).Text = "Title Here"

ChartPie.OpenData(SoftwareFX.ChartFX.COD.Values, 1, iCount)

ChartPie.Value(0, 0) = 0.72

ChartPie.Series(0).Legend = "Encoding ASCIIs"

ChartPie.Value(0, 1) = 0.72

ChartPie.Series(1).Legend = "Overstating Functional Items"

ChartPie.Value(0, 2) = 0.72

ChartPie.Series(2).Legend = "Emergency House Visits"

ChartPie.Point(iCount - 1).Color = Color.White

ChartPie.Point(iCount - 1).AlternateColor = Color.Gray

ChartPie.Point(iCount - 1).Pattern = Drawing2D.HatchStyle.Cross

ChartPie.CloseData(SoftwareFX.ChartFX.COD.Values)

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...