Soma total em GRID
Bom dia a todos!
Alguém poderia me dizer como faço para somar todas as linha de um grid e colocar o total dentro de Dbedit?
Uso Dbexpress com Interbase.
Obrigado
Jelves
Alguém poderia me dizer como faço para somar todas as linha de um grid e colocar o total dentro de Dbedit?
Uso Dbexpress com Interbase.
Obrigado
Jelves
Jelves
Curtidas 0
Respostas
Edineidaniel
30/06/2003
Bom,
acho q a resposta para a sua solução é simples:
vc primeiro realizar um consulta e mostra no grid....
vamos dizer q vc esta usando uma Query.
ai use a seguinte função:
while not Query1.Eof do
begin
i:=i+1;
Query1.Next;
end;
//depois
DBEdit1.Text := IntToStr(i);
//Não esqueça de declarar a fariável ´i´.
T+
acho q a resposta para a sua solução é simples:
vc primeiro realizar um consulta e mostra no grid....
vamos dizer q vc esta usando uma Query.
ai use a seguinte função:
while not Query1.Eof do
begin
i:=i+1;
Query1.Next;
end;
//depois
DBEdit1.Text := IntToStr(i);
//Não esqueça de declarar a fariável ´i´.
T+
GOSTEI 0
Ruysalles
30/06/2003
Monte o seguinte select:
Select sum(seu_campo)
from sua_tabela
para inserir no edit faça o seguinte:
edit1.text := sua_query.fields[0].asstring;
Case deseje formatar
edit1.text := formatfloat(´#,,0.00´,sua_query.fields[0].asfloat);
Valeu
Select sum(seu_campo)
from sua_tabela
para inserir no edit faça o seguinte:
edit1.text := sua_query.fields[0].asstring;
Case deseje formatar
edit1.text := formatfloat(´#,,0.00´,sua_query.fields[0].asfloat);
Valeu
GOSTEI 0