Hola
Coloca un TQuery en el form, conectalo a la bd:
Código Delphi
[-]
TuQuery.sql.text:= 'Select TuCampo from TuTabla where tucampo = '''+ Edit1.Text + '*''';
TuQuery.Open;
If TuQuery.Fields[0].Value <> Edit1.Text then
Showmessage('El dato no existe');
TuQuery.Close;
A ver asi:
Saludos