fazer um SUM e aparecer o resultado em um label ou botao

22/06/2017

0

Amigos Delphianos, Boa tarde.

Por favor, alguém poderia me ajudar ?
tenho este select "SELECT SUM(ESTADOROMANEIO) FROM romaneio WHERE ESTADOROMANEIO='5' " e gostaria que o resultado dele saísse em um label ou edit.
Como faço isso ?

estou usando as paletas SQLconnection ,Simpledatset,datasource e Query

Desde já muito obrigado.
Watson

Watson

Responder

Post mais votado

23/06/2017

Raimundo muito obrigado pela ajuda, Deus abençoe..
Caso alguém esteja com o mesmo problema segue abaixo : (Resolvido)

begin
with QRY do
begin
QRY.CLOSE;
QRY.sql.Clear;
QRY.sql.Text := 'SELECT SUM(ESTADOROMANEIO) ' +
'AS SOMA_ESTADOROMANEIO FROM romaneio WHERE ESTADOROMANEIO =' + '5';
QRY.open;
Painel_Resultado.caption :=CurrToStr(FieldByName('SOMA_ESTADOROMANEIO').AsCurrency);
end;
end;

Watson

Watson
Responder

Mais Posts

22/06/2017

Igor Lisboa

Boa tarde, Watson!

Para fazer isso você só precisa incrementar o "AS" no seu código, ficando mais ou menos assim:

SELECT SUM(ESTADOROMANEIO) AS SOMA_ESTADOROMANEIO FROM romaneio WHERE ESTADOROMANEIO = '5' 


Depois só jogar o valor do "SOMA_ESTADOROMANEIO" da query em um edit.

Espero que seja isso.
Responder

23/06/2017

Watson

Igor, Bom dia.
Muito obrigado pelo retorno.
Fiz dessa forma abaixo , ele dá erro no final do meu select aqui ---->> '5' , o que devo colocar aqui ?

begin
with Qry do
begin
Qry.close;
Qry.sql.clear;
Qry.sql.add('SELECT SUM(ESTADOROMANEIO) AS SOMA_ESTADOROMANEIO FROM romaneio WHERE ESTADOROMANEIO = '5'');
Qry.open;
panel2.Caption:= currtostr(fieldbyname('ESTADOROMANEIO').AsCurrency);
end;
end;

end.
Responder

23/06/2017

Raimundo Pereira

Posta a estrutura da Tabela
romaneio
campo desejado para somar e condição
Responder

23/06/2017

Watson

A estrutura da tabela é muito grande, mas vê se ajuda ...
(null) WMAS ROMANEIO 3 ESTADOROMANEIO NUMBER 10 0 0 10 1 (null) (null) 0 0 22 7 YES (null) (null) (null) (null) NO
Responder

23/06/2017

Watson

Amigo, caso queira , por favor me add no skype eu te envio e te explico melhor .
meu skype rocha325
Responder

23/06/2017

Watson

RESOLVIDO
Responder

08/04/2022

Pedro Lucas

Raimundo muito obrigado pela ajuda, Deus abençoe..
Caso alguém esteja com o mesmo problema segue abaixo : (Resolvido)

begin
with QRY do
begin
QRY.CLOSE;
QRY.sql.Clear;
QRY.sql.Text := 'SELECT SUM(ESTADOROMANEIO) ' +
'AS SOMA_ESTADOROMANEIO FROM romaneio WHERE ESTADOROMANEIO =' + '5';
QRY.open;
Painel_Resultado.caption :=CurrToStr(FieldByName('SOMA_ESTADOROMANEIO').AsCurrency);
end;
end;


Obrigado cara, me ajudou muito!
Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar