ошибка Undeclared identifier: 'Caption'

[wolf777]

procedure TFrmGraf.ButtonExeClick(Sender: TObject); // Показать
var
     i,ti, kd: integer;
     sfr: double;
begin
     Series1.Clear();  Series2.Clear();
     kd:=StrToInt(FrmProizvIS.EditKD.Text);
     if CheckBoxDG.Checked then
     begin
        Chart1.Title.Caption:='Диаграмма '+nGraf;
      for I := 0 to szmGR-1  do
       begin
      if  CheckBoxStr.Checked  then
          sfr:= masGR[i]
      else
         sfr:= masGR[i]/kd;
        ti:=i*TintGr; // frmProizISUnit.TintFr;
        Series1.AddXY(ti,sfr,'',clRed) ;
       end;
         if  CheckBoxStr.Checked  then
            Chart1.LeftAxis.Title.Caption:='Количество измерений'
          else
            Chart1.LeftAxis.Title.Caption:='Гистограмма измерений';;
      end;

     if CheckBoxGR.Checked then
     begin
     Chart1.Title.Caption:='График '+nGraf;
      for I := 0 to szmGR-1  do
       begin
       if  CheckBoxStr.Checked  then
          sfr:= masGR[i]
      else
         sfr:= masGR[i]/kd;
       ti:=i*TintGr;    //frmProizISUnit.TintFr;
       Series2.AddXY(ti,sfr,'',clGreen) ;
       end;
     end;
     Chart1.BottomAxis.Title.Caption:='Время в секундах';
  end;

 procedure TFrmGraf.ButtonExitClick(Sender: TObject);
begin
    Close();
end;

как исправить ошибки?

[ошибка] frmGrafUnit.pas(65): Undeclared identifier: 'Caption'
[ошибка] frmGrafUnit.pas(83): Undeclared identifier: 'Caption'

[Aleksandr H.]

может так?
http://www.programmersforum.ru/showthread.php?t=216494

[wolf777]

Aleksandr H. спасибо за быстрый ответ, не ответ не тот, просто я вот понять не могу, почему то так работает

Chart1.Title.Text.Text:='График'+nG raf;

а так не работает

Chart1.Title.Caption:='График'+nGra f;

вот не могу понять из за чего это

[northener]

Сообщение от wolf777

вот не могу понять из за чего это

Из-за того, что у класса TChartTitle нет свойства Caption. Как бы вам этого не хотелось. Зато есть свойство Text, которое вам и нужно использовать.

[wolf777]

northener спасибо огромное за разъяснение буду знать)))