Busca...

Delphi

03/07/2003

Ola



Como fazer para verificar de ja exite determinado registro
Eu uso Table

O campo e do tipo Alpha, e uso dbedit para verificar e incluir.

O nome do campo é Atestado.

Valeu.


Dart


Dart

Dart

Curtidas 0

Respostas

Okama

Okama

03/07/2003

While not Table1.EOF do begin 
    if Table1.FieldByName(´Atestado´).asString = REGISTRO then begin
       Showmessage( ´Registro encontrado´);
       Break;
    end; 
    Table1.next; 
end;


Ou 

if Table1.Locate(´Atestado´,registro,[loCaseInsensitive]) then 
  Showmessage( ´Registro Localizado´);


Uma dica, use o campo Atestado como chave primária que nunca se repetirá, o próprio banco se encarrega de fazer o controle.


GOSTEI 0
Dart

Dart

03/07/2003

Obrigado Okama

Valeu a dica.
Dart


GOSTEI 0
POSTAR