Fórum Dúvida com Select #253453

06/10/2004

0

Uso Firebird 1.5 e Delphi6

Estou com a seguinte dúvida:

Tenho uma tabela RESUMO_VENDAS, nessa tabela dou o seguinte select:

select f_pagto,sum(total_vendas) from resumo_vendas group by f_pagto


com isso consigo o seguinte resultado

F_PAGTO -- SUM
Dinheiro -- 10,00
Cartão de Crédito -- 20,00
Cheque -- 30,00


gostaria de saber como faço para colocar essas somas obtidas em edits separados

edit1.text:=strtofloat(datamodule1.sqldataset3.fieldbyname(´dinheiro ´).asfloat)

edit2.text:=strtofloat(datamodule1.sqldataset3.fieldbyname(´cheque ´).asfloat)

edit3.text:=strtofloat(datamodule1.sqldataset3.fieldbyname(´cartão de crédito ´).asfloat)

eu sei que o nome do campo tem quem ser F_PAGTO, gostaria de saber como posso dar alias para as diferentes formas de pagamentos.


Não sei se fui claro.

Obrigado


Gameiro

Gameiro

Responder

Posts

06/10/2004

Aroldo Zanela

Colega,

Use uma dbGrid associada ao DataSet (Query), pois vai suprir sua necessidade e te poupar algumas linhas de código. No entanto, se julgar necessário atribuir a Edits, você deverá fazer um laço (while..do) e utilizar uma estrutura de desvio condicional ( if, case, etc).


Responder

Gostei + 0

06/10/2004

Gameiro

valeu pela dica

Obrigado


Responder

Gostei + 0

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

Aceitar