Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   como realizo una suma en un DBGrids (https://www.clubdelphi.com/foros/showthread.php?t=32973)

esimon 22-06-2006 17:04:04

como realizo una suma en un DBGrids
 
Buen día para todos.........!

Tengo una tabla en Accesse con lo siguiente campos:
  • Codigo_Ariticulos
    Descripción_Articulos
    Cantidad_Articulos
    Precios_Articulos
    Valor
    Total


Esto lo represento en un DBGrid en el cual utilizo una rutina para buscar la descripción y el precios, hasta esta parte me funciona muy bien.

Quiero que cuando digite la cantidad del articulo este se multiplique por el precio y me lo muestre en el campo Valor.
Y si inserto un nuevo registro haga los mismo y al final el campo total me sume todos los valores que tiene el campo valor.

gracias

marcoszorrilla 22-06-2006 17:56:14

Si se trata del total de un registro es decir una fila, puedes poner un evento en los 2 campos que intervienen en el cálculo, por ejemplo supongamos que total es igual a unidades por precio.
T=U*P

En el evento OnChange de ambos campos:
Código Delphi [-]
Table1total.Value:=Table1Unidades.Value * Table1PrecioValue

De esta manera cada vez que modifiques uno de los 2 valores te recalculará el importe de la lína.

En cuando al importe total, supongo que puedes referirte al total de un albarán o una factura por ejemplo.

Pues hacerlo con una consulta:
Código SQL [-]
Select Sum(Total) as total
From MiTabla
Where Numero = 200

Un Saludo.

nemesio 23-06-2006 00:02:18

Hola

También puedes hacer a "Total" un campo calculado y en el evento OnCalcFields de la Tabla colocas la formula de que: Table1Total.Value:=Table1Precio.Value*Table1Cantidad.Value;


La franja horaria es GMT +2. Ahora son las 14:56:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi