Delphi TeeChart如何调整第二个图表的series的linepen线宽并解决报错

开发者阿泽

2026-10-5

错误原因

作用域问题：你可直接调用的series1~series6是Chart1关联的全局/窗体级实例，Chart2的系列没有声明为series1、series7这类全局变量，直接调用会报未声明标识符。
类型转换问题：TChart的Series基类没有LinePen属性，只有线条类系列（TLineSeries）才有该属性，不做类型转换直接访问会报LinePen未声明。
索引偏移问题：TeeChart的Series数组是0起始索引，你写的Series[1]实际访问的是第二个系列，不是第一个。

正确修改方案

你的代码语法为Delphi风格，以下为对应环境的写法：
首先在单元引用区引入对应依赖：

uses
  VCLTee.Series; // 旧版本Delphi对应引用TeeSeries单元

方式1：按索引逐个修改

// 修改Chart2第1个线条系列线宽
TLineSeries(Chart2.Series[0]).LinePen.Width := 10;
// 修改Chart2第2个线条系列线宽
TLineSeries(Chart2.Series[1]).LinePen.Width := 10;
// 剩余4个系列对应索引2~5，按需修改即可

方式2：批量修改Chart2所有线条系列线宽

var
  i: Integer;
begin
  for i := 0 to Chart2.SeriesCount - 1 do
  begin
    // 先判断系列类型，避免类型转换报错
    if Chart2.Series[i] is TLineSeries then
      TLineSeries(Chart2.Series[i]).LinePen.Width := 10;
  end;
end;

如果是C++ Builder环境，对应语法如下：

// 单个修改
dynamic_cast<TLineSeries*>(Chart2->Series[0])->LinePen->Width = 10;

// 批量修改
for(int i = 0; i < Chart2->SeriesCount; i++)
{
  TLineSeries* lineSer = dynamic_cast<TLineSeries*>(Chart2->Series[i]);
  if(lineSer)
  {
    lineSer->LinePen->Width = 10;
  }
}