построение графика зависимости с использованием TChart по значениям из dbgrid

[redneckoder]

пытаюсь реализовать это следующим образом:

procedure TForm1.SpeedButton3Click(Sender: TObject);
var a1,a2,u:integer;
begin
      With Series1 do
      begin
       try
       Clear;
       a1:=SdfDataSet1.FieldByName('Profession').AsInteger;
       a2:=SdfDataSet1.FieldByName('Age').AsInteger;
       Add(a1,'Профессия',clRed);
       Add(a2,'Возраст',clBlue);
       except
         on EConvertError do
         u:=1;
       end;
      end;
end;

но так рисуется зависимость по данным только из текущей строки, а как сделать так, чтобы зависимость строилась по всем значениям из dbgrid?

[Stilet]

В цикле, но по-моему лучше взять DBChart и настроить его на нужный набор данных.

[redneckoder]

Забыл уточнить, использую lazarus, DBChart среди компонентов не обнаружил, видимо придётся как-то циклом выкручиваться или искать альтернативу