[AC Rodrigues]

Ola Pessoal Boa noite,

Bem gente sou novo no forum e na area de programação em Delphi e estou com úma dúvida que talvez possa ser a dúvida de mais alguns por ai é o seguinte

Estou trabalhando num projeto que usa firebird+delphi32 com Delphi 7 usando a conexão por dbexpress

meu problema é o seguinte:

preciso efetuar uma pesquisa no banco de dados que me retorne um valor total de registros tipo:

select COUNT(grupo_produtos.nome_grupo_produto) from grupo_produtos.

enfim eu preciso de um SQL que me retorne o valor total dos registros, até ai tudo bem.

o meu problema maior é o seguinte, eu não estou conseguindo passar o retorno dessa SQL, o resultado de COUNT para uma variavel ou um txt, enfim alguma coisa para que eu possa fazer uma comparação tipo estou querendo fazer algo semelhante a isso:

select COUNT(grupo_produtos.nome_grupo_produto) from grupo_produtos where grupo_produtos.nome_grupo_produto = 'AMD';

result := /valor de retorno do count

if (result = 1 ) then

'Registro Já Existe
else
'Registro não existe

end;


Bem gente entenderam mais ou menos o que eu preciso fazer?

Alguém poderia me dar uma solução para a minha dúvida?

Conto com a Ajuda do Fórum para isso

Perdão se já ouver algum post com algo semelhante.

Obrigado.

Este post foi editado por Mário Monteiro: 06 novembro 2009 - 16:51
Razão por editar:: Retirada de CAIXA ALTA

[EricaRosana]

Bom dia.

você tentou usar ?

Query.FieldByName('QTDE').AsInteger

através do FieldByName você acessa todos registros da seleção.


Espero ter ajudado.

[AC Rodrigues]

EricaRosana, em 03 novembro 2009 - 09:41 , disse:

Bom dia.

você tentou usar ?

Query.FieldByName('QTDE').AsInteger

através do FieldByName você acessa todos registros da seleção.


Espero ter ajudado.

Obrigado Erica,

Funcionou Perfeitamente aqui

Era exatamente isso que eu estava precisando

muito obrigado pela ajuda