Fórum problema com dbchart #372329

frmGraficoquantidade.qryGrafico.first;
    while not frmGraficoquantidade.qryGrafico.eof do
    begin
      // criação da série do tipo Linha
      LineSerie := TLineSeries.Create(Self);
      LineSerie.Title:= frmGraficoquantidade.qryGrafico.FieldByName(´Categoria´).AsString;
      LineSerie.AddY( frmGraficoquantidade.qryGrafico.FieldByName(´qtde´).AsFloat,frmGraficoquantidade.qryGrafico.FieldByName(´FATURA_Competencia´).AsString);
      LineSerie.Active:= True;
      LineSerie.Visible:= true;
      frmGraficoquantidade.DBChart1.AddSeries(LineSerie);
      frmGraficoquantidade.qryGrafico.next;
    end;
    frmGraficoquantidade.ShowModal;