Como fazer uma consulta?

05/09/2006

0

Boa tarde a todos.
Estou montando um sistema usando o IBDataSet.
Ao digitar dados em um DBEdit gostaria de imediatamente pesquisar se o registro já está cadastrado.

Estou fazendo assim e não está dando certo:

If IBDataSet1.Locate(´Nro_Conta´, DBEdit1.Text, []) then
begin
ShowMessage(´Número de conta já cadastrado.´);
DBEdit1.SetFocus;
end;

O que estou fazendo de errado?

Abraços.


Jmarcosmoraes

Jmarcosmoraes

Responder

Posts

22/09/2006

Elter.teodoro

Voce esta querendo mover um ponteiro de registro que esta sendo Editado.

Evite os Locates,Filters e SetRanges e melhor trabalhar com comandos SQL.


Sera voce usar o componente de com IBQuery


Veja o Exemplo :

IBQuery.close ;
IBQuery.sql.text := ´ Select Nro_Conta from Banco ´+
´ Where Nro_Conta = ´+DBEdit1.Text ;
DBEdit1.open ;

if IBQuery.Eof then
begin
ShowMessage(´Número de conta já cadastrado.´);
DBEdit1.SetFocus;
end;

IBQuery.close ;


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