Graficas de barras en delphi 7

[carlos gonzalez]

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.