[TriLoCBA]

Al pulsar el Button1 quiero graficar, en un DBChart de barras, la tabla de valores generados por un stored procedure del SQLServer (spTablaGrafico1).

En el eje X van las fechas (dias), campo "Fecha".
En el eje Y van las cantidades (enteros), campo "Cant".

Pude vincularlo, pero solamente me grafica una barra con el primer valor que entrega el SP.

No estoy seguro de estar usando bien el DBChart.

Desde ya agradezco como siempre toda vuestra ayuda.

Un abrazo.
TriloCba.


Este es el codigo que utilizo:

Código Delphi [-]
var
  Form1: TForm1;
  conSQL: TADOConnection;
  CadenaSQL: String;
  sp1:TADOStoredProc;
  ds1:TDataSource;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  //Conexion al SQLServer...
  CadenaSQL:='Provider=SQLOLEDB.1;Password=MiPass;Persist Security Info=True;'+
  'User ID=MiUsu;Initial Catalog=MiBase;Data Source=154.25.41.8;'+
  'Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;'+
  'Use Encryption for Data=False;Tag with column collation when possible=False';

  conSQL:=TADOConnection.Create(self);
  conSQL.ConnectionString:= CadenaSQL;
  conSQL.LoginPrompt:=False;
  conSQL.Connected:= True;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  with sp1 do begin
    sp1:=TADOStoredProc.Create(self);
    Connection:= conSQL;
    ProcedureName:= 'spTablaGrafico1';
    Active:= true;
  end;
  ds1:=TDataSource.Create(self);
  ds1.DataSet:=sp1;
  with DBChart1.SeriesList.Series[0] do begin
    DataSource:= ds1;
    XLabelsSource:='Fecha';
    Xvalues.ValueSource:='Fecha';
    Yvalues.ValueSource:='Cant';
  end;
end;