Encontrar texto intermedio en un DBGrid

[ecfisa]

Hola Oscar.

Se me deslizó un error en el código anterior, el signo '=' no corresponde (eso me pasa por hacerlo en el aire... ), así que sería:

Código Delphi [-]
with BuscaIntermedio do
  begin
    Close;
    SQL.Clear;
    SQL.Text:= 'SELECT * FROM CLIENTES WHERE CNOMBRE LIKE :BUSCADO';
    Parameters.ParamByName('BUSCADO').Value:= '%'+Edit1.Text+'%';
    Open;
 end;

Para que puedas ver un ejemplo en funcionamiento, te adjunto uno con ADO, me dí cuenta que estás usando esos componentes por Parameters .
Crea una carpeta y descomprimelo allí. El ejemplo usa la tabla country de dbdemos.mdb que viene con Delphi (que te incluyo).

Saludos.