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

【问题标题】：DevExpress SpreadSheetControl Chart set line color /styleDevExpress SpreadSheetControl 图表设置线条颜色/样式
【发布时间】：2015-05-13 11:05:27
【问题描述】：

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

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

【问题讨论】：

标签： vb.net devexpress spreadsheet

【解决方案1】：

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

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

【讨论】：

我很抱歉花了这么长时间才回复。感谢您的有用帖子。我可以按照您在示例中的描述设置颜色。但是，Outline.With 对线宽没有影响。
@Lorgarn Outline.Width 如果您将电子表格保存到文件并直接在 Microsoft Excel 中打开，则有效。
编辑：我弄错了，它只是 DevExpress SpreadSheetControl，它无法绘制不同宽度的线条。导出的 Excel 工作表在 Excel 中打开时使用正确的宽度。再次感谢。

【解决方案2】：

“线”是图表系列，可以在Series 属性中访问。从那里您可以更改该系列的各种内容，包括颜色。或者，您可以使用CustomDrawSeries 事件自己自定义绘制系列。

【讨论】：