Soma da Coluna do DBgrid
Pessoas, me ajudem, sei deve ser algo muito facil pra vcs, mas como eu sou um novato, gostaria de saber, como faz pra somar os valores da coluna de um DBgrid.
Desde já agradeço.
Fernando Augusto
Desde já agradeço.
Fernando Augusto
Fernando Augusto
Curtidas 0
Respostas
Ronaldo
30/04/2003
Você terá que somar o valor na table e não no grid.
Algo como:
var dSoma: Double;
dSoma := 0;
Table1.DisableControls;
Table1.First;
try
while not TAble1.eof do
begin
dSoma := dSoma + Table1.FieldByName(´valor´).AsFloat;
Table1.Next;
end;
finally
Table1.EnableControls;
end;
Algo como:
var dSoma: Double;
dSoma := 0;
Table1.DisableControls;
Table1.First;
try
while not TAble1.eof do
begin
dSoma := dSoma + Table1.FieldByName(´valor´).AsFloat;
Table1.Next;
end;
finally
Table1.EnableControls;
end;
GOSTEI 0
Fernando Augusto
30/04/2003
Você terá que somar o valor na table e não no grid.
Algo como:
var dSoma: Double;
dSoma := 0;
Table1.DisableControls;
Table1.First;
try
while not TAble1.eof do
begin
dSoma := dSoma + Table1.FieldByName(´valor´).AsFloat;
Table1.Next;
end;
finally
Table1.EnableControls;
end;
Valeu, vou tentar.....
GOSTEI 0
Fernandocneto
30/04/2003
[quote:9d2978653a=´Fernando Augusto´]Pessoas, me ajudem, sei deve ser algo muito facil pra vcs, mas como eu sou um novato, gostaria de saber, como faz pra somar os valores da coluna de um DBgrid.
Desde já agradeço.
Fernando Augusto[/quote:9d2978653a]
Coloque uma query e um datasource no form, lique a query no DataBase, e lique o datasource na query, selecione a query e clique na propriedade Sql, digite o codigo:
SELECT SUM(NOMEDOCAMPO) AS TOTAL FROM NOMEDATABELA
coloque um dbedit e lique na propriedade DataSet:nome da query e Datafield: nome do campo...
espero ter ajudado!!!
Desde já agradeço.
Fernando Augusto[/quote:9d2978653a]
Coloque uma query e um datasource no form, lique a query no DataBase, e lique o datasource na query, selecione a query e clique na propriedade Sql, digite o codigo:
SELECT SUM(NOMEDOCAMPO) AS TOTAL FROM NOMEDATABELA
coloque um dbedit e lique na propriedade DataSet:nome da query e Datafield: nome do campo...
espero ter ajudado!!!
GOSTEI 0