jpatel Posted August 11, 2010 Report Posted August 11, 2010 We've been using chartfx with Active Reprots. 95% of the time everything works fine. But Some time we are having issues with Area chart and pie chart. Some times they come out in complete(i.e. pie missing from a pie chart and a big section of Area is missing form the Area chart. Below is a piece of code which used to generate Area chart. Dim objGrowthChart As SoftwareFX.ChartFX.Wrapper.Chart = New SoftwareFX.ChartFX.Wrapper.Chart _ ( CType(CustomControl2.Control, ChartFX.WinForms.Chart), True)objGrowthChart.SerLegBox = FalseobjGrowthChart.AxisX.Gridlines = False If CustomControl2 Is Nothing ThenMe.CustomControl2 = CType(Me.Detail.Controls(21), DataDynamics.ActiveReports.CustomControl) End IfWith objGrowthChart .SerLegBox = False.Gallery = SoftwareFX.ChartFX.Wrapper.Gallery.Area .AxisY.LabelsFormat.Decimals = 0 .AxisY.LabelsFormat.Format = AxisFormat.Number .AxisY.Title.Text = "$ Thousands".AxisY.Gridlines = True.AxisX.DataFormat.CustomFormat = "#,##0".AxisX.Title.Text = "".AxisX.Step = 8 Dim f As New System.Drawing.Font(.AxisX.Font.FontFamily, .AxisX.Font.Size - 2) .AxisX.Font = f.BorderObject = New DefaultBorder(BorderType.None) .Border = False.OpenData(COD.Values, 1, intRowCnt) For i = 0 To intRowCnt - 1 .Value(0, i) = arrGrowth(i).TotalAmount / 1000 .Point(0, i).Color = System.Drawing.Color.FromArgb(200, 200, 200) Select Case Month(arrGrowth(i).ReturnDate) Case 1, 2, 3strCurXLabel = "Q1"Case 4, 5, 6 strCurXLabel = "Q2"Case 7, 8, 9 strCurXLabel = "Q3"Case 10, 11, 12 strCurXLabel = "Q4" End Select.AxisX.Label(i) = strCurXLabel & vbCrLf & Format$(arrGrowth(i).ReturnDate, "yy")Next i .CloseData(COD.Values) End With Pls Help. Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.