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.