Fórum Exibir uma mensagem na tela quando atingir um resultado #401781
26/05/2011
0
Bom dia a todos.
Tenho um sistema em delphi 7 com banco firebird. Meu usuario quer que de 20 em 20 m³ mostre uma mensagem na tela para se realizar o slump do concreto, então começou o dia, ele vai verificar o volume pesado e a partir dos 20 m³, vai mostrar de 20 em 20. Ai pensei em verificar se for >= 20 mostrar a mensagem, mas assim iria ficar mostrando a tal mensagem toda carga acima de 20. Não uso table para essa tabela que guarda o volume produzido, é tudo realizado em sql. Alguem pode me dar uma ajuda.
Att.
Reginaldo
Tenho um sistema em delphi 7 com banco firebird. Meu usuario quer que de 20 em 20 m³ mostre uma mensagem na tela para se realizar o slump do concreto, então começou o dia, ele vai verificar o volume pesado e a partir dos 20 m³, vai mostrar de 20 em 20. Ai pensei em verificar se for >= 20 mostrar a mensagem, mas assim iria ficar mostrando a tal mensagem toda carga acima de 20. Não uso table para essa tabela que guarda o volume produzido, é tudo realizado em sql. Alguem pode me dar uma ajuda.
Att.
Reginaldo
Reginaldo Calora
Curtir tópico
+ 0
Responder
Posts
26/05/2011
Emerson Nascimento
crie uma variável numérica - vou chamar de contador - iniciada em 0 (zero) e tente algo assim:
select sum(peso) total from tabela where dia = :hoje
pegue o resultado, divida por 20 e verifique se é maior que o último valor medido.
resultado := qry.total div 20;
if (resultado > contador)
begin
contador := resultado;
ShowMessage('O total pesado ('+formatfloat(',#0.00', qry.total)+') alcançou um múltiplo de 20');
end;
select sum(peso) total from tabela where dia = :hoje
pegue o resultado, divida por 20 e verifique se é maior que o último valor medido.
resultado := qry.total div 20;
if (resultado > contador)
begin
contador := resultado;
ShowMessage('O total pesado ('+formatfloat(',#0.00', qry.total)+') alcançou um múltiplo de 20');
end;
Responder
Gostei + 0
26/05/2011
Reginaldo Calora
Muito obrigado, deu certo.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)