somar valores.... como fazer????
Galera, preciso fazer o seguinte:
A minha tabela tem 20 registros e preciso somar os valores em R$ desses vinte registros... e se o usuário inserir mais registros, automaticamente o sistema deverá somá-lo e retornar em um Label.
Utilizo o BD Paradox 7
Desde já agradecido...
Rafael.
A minha tabela tem 20 registros e preciso somar os valores em R$ desses vinte registros... e se o usuário inserir mais registros, automaticamente o sistema deverá somá-lo e retornar em um Label.
Utilizo o BD Paradox 7
Desde já agradecido...
Rafael.
Raydem
Curtidas 0
Respostas
Cabelo
12/11/2003
Utilize uma Query e de o seguinte select
select sum(Campo do valor) as d_sum from Tabela
de um open na query
pra visualizar a soma utilize um Tedit
edit1.text := ´R$´ + formatfloat(´#,,0.00´, Query.fieldbyname(´D_SUM´).asfloat);
Sem mais
Cabelo
select sum(Campo do valor) as d_sum from Tabela
de um open na query
pra visualizar a soma utilize um Tedit
edit1.text := ´R$´ + formatfloat(´#,,0.00´, Query.fieldbyname(´D_SUM´).asfloat);
Sem mais
Cabelo
GOSTEI 0
Joilson_gouveia
12/11/2003
Construa uma função que retorne a soma dos registros e a chame depois da abertura da tabela (Método Open/Active=True) e quando der update (inclusão/alteração/exclusão), evento ONUPDATEDATA do datasource.
Segue a query que ajudará na sua função:
query1.Close;
query1.SQL.Text := ´SELECT SUM(VALOR) AS TOTAL FROM TABELA´;
query1.Open;
Segue a query que ajudará na sua função:
query1.Close;
query1.SQL.Text := ´SELECT SUM(VALOR) AS TOTAL FROM TABELA´;
query1.Open;
GOSTEI 0