DevExpress SpreadSheetControl图表设置线条颜色/样式

时间:2015-05-13 11:05:27

标签: vb.net devexpress spreadsheet

DevExpress网站无法告诉我。如何影响创建的图形的线条颜色,粗细等?

Dim chart As Chart = myworb.Worksheets(1).Charts.Add(Charts.ChartType.ScatterLine)
chart.TopLeftCell = myworb.Worksheets(1).Cells("A83")
chart.BottomRightCell = myworb.Worksheets(1).Cells("F112")
chart.PlotArea.Fill.SetNoFill()

chart.Series.Add(myworb.Worksheets(1)("A1:A71"), myworb.Worksheets(1)("B1:B71"))
chart.Series.Add(myworb.Worksheets(1)("D1:D81"), myworb.Worksheets(1)("E1:E81"))
chart.Series.Add(myworb.Worksheets(1)("G1:G81"), myworb.Worksheets(1)("H1:H81"))
chart.Series.Add(myworb.Worksheets(1)("J1:J71"), myworb.Worksheets(1)("K1:K71"))
chart.Series.Add(myworb.Worksheets(1)("M1:M66"), myworb.Worksheets(1)("N1:N66"))

chart.Title.Visible = False
Dim axisX = chart.PrimaryAxes(0)
axisX.MajorTickMarks = AxisTickMarks.None
axisX.Scaling.AutoMax = False
axisX.Scaling.AutoMin = False
axisX.Scaling.Max = maxX1
axisX.Scaling.Min = minX1

Dim axisY = chart.PrimaryAxes(1)
axisY.MajorTickMarks = AxisTickMarks.None
axisY.Scaling.AutoMax = False
axisY.Scaling.AutoMin = False
axisY.Scaling.Max = maxY1
axisY.Scaling.Min = minY1

通常我只是创建一个Excelfile作为模板,将其加载到控件中,只需填充图表用作系列的值。但由于我必须手动缩放它,因为Excel自动缩放不起作用,我必须从头开始创建整个图表。我无法找到有关如何以编程方式在图表中设置颜色等的信息。任何帮助都是非常有用的。

2 个答案:

答案 0 :(得分:1)

您可以使用系列对象的ShapeFormat.Outline属性设置颜色和粗细。调用ShapeOutlineFill.SetSolidFill方法设置线条的颜色,然后使用ShapeOutline.Width属性设置线宽。
这是一个例子:

chart.Series(5).Outline.SetSolidFill(Color.Magenta)
chart.Series(5).Outline.Width = 20

答案 1 :(得分:0)

" line"是图表系列,可以在Series属性中访问。从那里你可以改变关于系列的各种事情,包括颜色。或者,您可以使用CustomDrawSeries事件自行自定义绘制系列。