Sumar Columnas de Un DBGRIB

[cancerbero]

Saludos vtdeleon

Bueno si intente eso de sumar el campo directamente pero he aqui el dilema como hago para sumar solo un campo de la tabla, el cual guarda la suma total del detalle de compra.

bueno ese es el problema q tengo y luego este dato bueno lo tengo q presentar en un componente Edit pero eso si necesito sumar el dato y a la vez q el usuario quite un producto del detalle este resultado se vuelva a calcular, gracias de antemano por la ayuda

[AGAG4]

Bajate los RxLib, alli viene un componente que se llama MemoryData, este funciona igual que una Table de la paleta BDE, pero con la diferencia que es en memoría, en primer lugar tienes que declarar la estructura del rxMemoryData igual que tu detalle, y cada vez de que vayas INSERTANDO (OnBeforeInsert) , MODIFICANDO(OnBeforePost) Y BORRANDO
(OnAfterDelete) que espero estes usando un DadaSet ó ClientDataset, llamas un procedimiento donde barres dicho rxMemoryData para sacar el Total de algún campo y mostrarlo ya sea añadiendo el TOTAL en un campo Calculado ó pasandolo directamente en algun Edit.

Espero me haya explicado, cualquier duda estamos en contacto....

[cancerbero]

Bueno escuche algo de las Librerias Rx pero estoy trabajando con una base de datos MSACCESS la cual la conecto por medio de los componentes ado, es el problema q no se si las LIbRx trabajan con ADO igual q con los componentes DBE.

gracias de antemano

[PepeLolo]

Empezado por cancerbero

Saludos vtdeleon

Bueno si intente eso de sumar el campo directamente pero he aqui el dilema como hago para sumar solo un campo de la tabla, el cual guarda la suma total del detalle de compra.

bueno ese es el problema q tengo y luego este dato bueno lo tengo q presentar en un componente Edit pero eso si necesito sumar el dato y a la vez q el usuario quite un producto del detalle este resultado se vuelva a calcular, gracias de antemano por la ayuda

Tienes dos problemas y por tanto tienes que aplicar una solución para cada caso:
a) Campo calculado para el DBGrid
b) Suma total (Suma de los campos calculados)

Soluciones:
S1) Lo que te han indicado para el campo calculado
S2) Una nueva consulta que te devuelva el acumulado de todos los campos calculados. Como no se pueden usar campos calculados en una Query, lo que tienes que hacer es lanzar una SQL que te devuelva el total
En el evento AfterScroll de tu tabla algo parecido a esto

Código Delphi [-]
  With QTotal do
    begin
       QTotal.sql.Add('SELECT SUM(Precio * Cantidad) Total FROM VentasClientes');
       QTotal.Sql.Add(' WHERE Cliente = '  + Quoted(CodCliente.Txt) );
       QTotal.Open;
       miTEdit.text := FormatFloat('#,###,##0.00', QTotal.Fields[0].AsFloat);
       QTotal.Close;
    end;

Cada vez que ocurra una actualización en el detalle, llamas a este evento y te refrescará el total.

un saludo.