[ecfisa]

Hola Jesuco , bienvenido a Club Delphi

Como a todos los que se inician te invitamos a que leas nuestra guía de estilo.

Mediante el método IsEmpty(), un ejemplo del uso:

...
{
  ADOQuery1->Close();
  ADOQuery1->SQL->Clear();
  ADOQuery1->SQL->Add("SELECT * FROM TU_TABLA");
  ADOQuery1->SQL->Add("WHERE UN_CAMPO = :PVALUE");
  ADOQuery1->Parameters->ParamByName("PVALUE")->Value = Edit1->Text;
  ADOQuery1->Open();
  if (ADOQuery1->IsEmpty())
    ShowMessage("No se encontraron datos coincidentes");
}

Saludos.