Como enviar um valor de um (DBGrid) para um Label?
:D Ae galera blz!
É o seguinte eu tenho uma tabela de vendas e gostaria q toda vez q eu vendesse alguns produtos fosse somado o seu valor num (Label).
Ex: Eu vendi um produto X no valor de R$58,90 Reais, q foi adicionado a DBGrid.
Ai o cliente resolveu comprar o produto Y no valor de R$150,50 q também foi adicionado a DBGrid. Então eu tenho dois produtos na DBGrid.
Gostaria q este valores fosse somado e exibido num Label.
Mais sem precisar clicar em nem um botão ou seja assim q fosse inserido os produtos na DBGrid já ia somando.
Estou usando Delphi 7 e Paradox.
Se alguém puder me ajudar ficarei grato.
Valeu!
:D :D :D
Jackell Alves
É o seguinte eu tenho uma tabela de vendas e gostaria q toda vez q eu vendesse alguns produtos fosse somado o seu valor num (Label).
Ex: Eu vendi um produto X no valor de R$58,90 Reais, q foi adicionado a DBGrid.
Ai o cliente resolveu comprar o produto Y no valor de R$150,50 q também foi adicionado a DBGrid. Então eu tenho dois produtos na DBGrid.
Gostaria q este valores fosse somado e exibido num Label.
Mais sem precisar clicar em nem um botão ou seja assim q fosse inserido os produtos na DBGrid já ia somando.
Estou usando Delphi 7 e Paradox.
Se alguém puder me ajudar ficarei grato.
Valeu!
:D :D :D
Jackell Alves
Vitoreduardo
Curtidas 0
Respostas
Rm
10/07/2004
No evento afterpost da table coloque um while para soma o valor
var
soma:real;
begin
table1.first;
soma:=table1valor.value;
table.next;
while not table1.eof do begin
soma:=soma+table1valor.value;
table1.next;
end;
label1.caption:=floattostr(soma);
end;
Espero ter ajudado.
SDS/RM
var
soma:real;
begin
table1.first;
soma:=table1valor.value;
table.next;
while not table1.eof do begin
soma:=soma+table1valor.value;
table1.next;
end;
label1.caption:=floattostr(soma);
end;
Espero ter ajudado.
SDS/RM
GOSTEI 0
Vitoreduardo
10/07/2004
Desculpe RM pois sou iniciante em delphi e esta dando o seguinte erro.
Undeclared identifier (QR_DetVendasValor). :oops: :oops:
Undeclared identifier (QR_DetVendasValor). :oops: :oops:
GOSTEI 0
Rm
10/07/2004
Um dia todo mundo foi iniciante... o importante é prosseguir...
o ´Table1valor.value;´ que listei se refere unicamente ao campo da tabela que tu desejas somar.Se o campo é (QR_DetVendas) não deves listar como (QR_DetVendasValor) e sim como´ QR_DetVendas.value ´ apenas.
Ou é isto ou esquecestes de colocar ´.value´ após a descrção do campo (que deve ser numérico).
Creio ser isto ...
Até mais
o ´Table1valor.value;´ que listei se refere unicamente ao campo da tabela que tu desejas somar.Se o campo é (QR_DetVendas) não deves listar como (QR_DetVendasValor) e sim como´ QR_DetVendas.value ´ apenas.
Ou é isto ou esquecestes de colocar ´.value´ após a descrção do campo (que deve ser numérico).
Creio ser isto ...
Até mais
GOSTEI 0