Graficas de barras en delphi 7
 

Hola amigos, tengo una duda ojala puedan ayudarme, estoy desarollando en delphi 7 y actualmente tengo un sistema con un modulo que me genera graficas de barras estoy usando el componente Tee chart actualmente grafico usando algo como esto

Código Delphi [-]
 
 WHILE NOT DATAM.SDSConsultas.Eof DO
 BEGIN
   Series2.Add(DATAM.SDSConsultas.FIELDBYNAME('TOTALUDS').AsFloat,DATAM.SDSConsultas.FIELDBYNAME('HORA'  ).ASSTRING);
   IF DATAM.SDSConsultas2.Locate('HORA',DATAM.SDSConsultas.FIELDBYNAME('HORA').ASSTRING,[])= TRUE THEN
     TASK:=DATAM.SDSConsultas2.FIELDBYNAME('TOTAL').AsInteger
   ELSE
      TASK:=0;
   Series3.Add( TASK,DATAM.SDSConsultas.FIELDBYNAME('HORA').ASSTRING);
   DATAM.SDSConsultas.Next;
 END;

actualmente en una sola barra pongo un valor por ejemplo a las 8:00 horas en la grafica le pongo 150 que quiere decir que las 8 horas fabrique 150 pantalones.

Pero como actualmente fabricamos pantalones, camisas y chamarras

me estan pidiendo que cada barra me la divida en 3, donde una parte ma la pinte en rojo y digamos que ponga 50, azul y ponga 30 y la ultima parte de amarillo y ponga 20, que significaria que a las 8 fabrique 50 pantalones+30 camisas+20 chamarras.

Es posible hacer esto con el componente teechart. si alguien sabe si es posible hacer esto les agradeceria bastante lo compartan con migo.

Si añades una serie con los valores para cada cosa podrás sacar un gráfico como este (que creo que te sirve para lo que quieres):