Hola ancara
Para mi seria algo asi:
Código Delphi
[-]
begin
modulodatos.TBCliente.Filter:='Nombre='''+VConsultarClientenombre.nombre.Text+'''';
modulodatos.TBCliente.Filtered:=true;
if (ModuloDatos.TBCliente.Filtered = true) then
begin
formulariobusqueda.hide;
formulariodatos.show;
end
else
modulodatos.tbcliente.Filtered:=false;
raise ENombreNoEncontrado.newInstance;
end;
No entiendo la necesidad de recorer la tabla con un eof en un filtro.
Saludos