Soma automática no dbgrid

[daniel_silva]

Bom dia. 😄

Estou a fazer uma tela para orçamentos, e o meu objetivo é: 

Ao inserir um artigo com o preço já introduzido de outra tabela, queria que somasse o campo preço automaticamente numa caixa de texto. 

Edited March 21, 2017 at 11:39 AM by daniel_silva

[JoãoRicardo]

como eu sou bom na area de PCs nao te sei responder 😄

Edited March 21, 2017 at 10:59 AM by JoãoRicardo

[nunopicado]

Tens várias formas de fazer isso...
Uma é ires tomando conta dos valores inseridos, e somar directo no programa.

Outra por exemplo é na tua query teres um campo de soma, e ao adicionares novos valores o campo vai sendo actualizado, e tu mostras o valor desse campo.

[daniel_silva]

@nunopicado podes explicar melhor sff? 

[nunopicado]

É complicado dar mais detalhes sem saber ao certo o teu cenário.
Mas por exemplo, tens uma query para a DBGrid.
Queres saber a soma dos valores de uma determinada coluna.

Crias uma segunda query, algo tipo isto:
 

SELECT Sum(Price) AS Total FROM Orcamentos WHERE Doc = 1234

E depois metes um TDBEdit, por exemplo, com um segundo TDataSource ligado a esta segunda query, e usas o campo Total para o preencher.

 

Depois, no OnDataChange do datasource da query principal (da DBGrid), fazes o refresh da segunda query:

procedure TForm1.QueryOrcamentosDataChange(Sender: TObject);
begin
  QueryTotal.Refresh;
end;

 

Desta forma, quando a grid for editada, a query total será processada novamente, actualizando o valor do total.

[daniel_silva]

Vou tentar explicar o meu cenário, tenho uma tela de orçamentos... E imagina insiro um artigo que aparece automaticamente o preço num dbedit, e é sempre assim, insiro outro artigo com o preço... É assim o ciclo. 

O que queria fazer era, insiro o 1º artigo de 60€ aparece automático no dbedit ao inserir o 2º artigo de 100€ queria que aparece no dbedit (valor total) a soma desses dois artigos, ou seja 120€ e sempre assim. 

Vou experimentar da maneira como disseste, e já digo alguma coisa 😄  

Obrigado 🙂