Dudas con TDBGrid

[FrianxD]

Bueno aca les dejo mi duda con el TDBGrid espero que puedan ayudarme y si no doy las gracias de todos modos!

Tengo un TDBGrid con 3 columnas. Lo que necesito saber es como podria yo sumar todos los numeros q hay en la columna N°3 y q aparesca en un TDBEdit, o TDBText, da lo mismo eso, pero necesitaria eso basicamente, saber como hacer q sume todos los numeros de la columna N°3 del TDBGrid y q el resultado lo deje escrito en alguno de esos lados



Desde Ya les agradesco si me pueden ayudar y si no tb,



Atte: Brian!

[[coso]]

Hola,
se deben sacar los datos desde la base de datos, no del dbgrid (al menos, es mas sencillo). Si usas tablas

Código Delphi [-]

suma := 0;
Table1.First;
while not Table1.Eof do 
begin
   suma := suma +   Table1.FieldByName('dato_columna3').Asdouble;
   Table1.Next;
end;

si usas querys

Código Delphi [-]

query1.Active := false;
query1.SQL.Text := 'select sum(dato_columna3) as suma from tabla';
query1.Active := true;
ShowMessage(query1.FieldByName('suma').Asstring);

saludos.

[FrianxD]

Bueno, Muchisimas gracias por tomarse el tiempo de contestar, ahora voy a probar a ver que pasa! =) muchas gracias !


Edit: Seria mucho pedir que pases ese codigo a C++ ??


PD: Uso Tablas!

[[coso]]

Edit: Seria mucho pedir que pases ese codigo a C++ ??

X) si. De nada, y saludos.

PD : es sencillo, los . por -> y begin end por { }, alguna otra cosilla habra pero vamos...

[FrianxD]

ok, gracias igual


Edit: muchisimas gracias !