Comando Locate - Coisa chata...

Delphi

09/01/2004

Estou utilizando o comando Locate para verificar se um dado já foi cadastrado, porém estou tendo dores de cabeça, pois sou obrigado a fechar a janela do cadastro, pois o comando LOCATE seta o foco no dado, caso ele seja encontrado, tem algum modo de mandar localizar o registro e caso ele exista apenas apareça uma mensagem dizendo que existe e continuar cadastrando na mesma janela com os dados já antes editados.


Nish

Nish

Curtidas 0

Respostas

Nigro

Nigro

09/01/2004

Faça um Select com uma Query


GOSTEI 0
Nish

Nish

09/01/2004

Infelizmente não sei as rotinas e nem como fazer isso, se alguém me ajudar com os códigos e procedimentos eu agradeço..


até....


GOSTEI 0
Fórum Vini

Fórum Vini

09/01/2004

Nish,
coloque um componente Query no seu formulário, mude sua propriedade DatabaseName do mesmo jeito do table e use esse SQL:
Select * from nome_tabela where (campo_a_ser_procurado = :valorcampo)

Para checar, coloque esse código:
Query1.Active:= false;
Query1.ParamByName(´valorcampo´).asString:= ´valor do campo´;
Query1.Active:= true;
if (Query1.EOF and Query1.BOF) then
  Showmessage(´Não foi encontrado!´);


Espero ter ajudado.
Vinicius.


GOSTEI 0
Nish

Nish

09/01/2004

Muito obrigado Vinicios...Funcionou como eu queria...


Abração!


GOSTEI 0
POSTAR