[Elite237]

Hola de nuevo, fijense que aun no me sale la grafica con los correctos valores.

Lo que quiero hacer es sumar los valores de cada celda, y lo hago asi:

Código Delphi [-]
procedure TForm1.BitBtnGraficarClick(Sender: TObject);
var
 suma,i:integer;
 secc:string;
begin
for i := 1 to sgEvaluacion.RowCount - 1 do // 1 es la fila donde inicia la cuenta
  begin
    if sgEvaluacion.cells[0,i]= '' then
     secc:=sgEvaluacion.cells[1,i];
  begin
   if sgEvaluacion.cells[7,1]<>'' then
   suma := suma + StrToInt(sgEvaluacion.Cells[7,i]);
Series1.Clear;  {Where Series1 is your Bar series}
Series1.Add( suma , secc  , clBlue );
Series1.Add( suma ,secc    , clRed );
Series1.Add( suma , secc , clYellow );
end;
end;
end;

Pero me muestra los datos mal, todo juntos, y los valores del pie no aparecen todos.Como estan muy largos quiza por eso, habra alguna propiedad del tchart, donde pueda girar en un angulo de 90º para que quede verticales. Por ejemplo en la parte izquierda esta los valores que representan en numeros(osea la Y) y en la X deben de aparecer por ejemplo imagen personal y las demas secciones, pero como los nombres son largos quiza por esa razon, entonces alli es donde quiero saber como modificar el angulo, para que se aprecien todas las secciones.Gracias a todos saludos