[[Caral]]

Hola
Ahora vamos a tratar de hacer lo mismo usando where y and (Como te gusta):

Código Delphi [-]
procedure TFinscripcion.ApeMEExit(Sender: TObject);
begin
    with Query1 do
      begin
        Close;
        SQL.Text:= 'SELECT * FROM BDinscripcion'+
                   'WHERE NomE = '+QuotedStr(NomE.Text)+
                   'AND ApePE = '+QuotedStr(ApePE.Text)+
                   'AND ApeME = '+QuotedStr(ApeME.Text);
        Open;
        if not IsEmpty then
          begin
            MessageDlg('Datos EXISTENTE',mtError,[mbOk],0);
            NomE.SetFocus;
          end;
      end;
end;

Saludos