Consulta Like '%'+ :parametro + '%'

[[BlueSteel]]

Hola

solo tienes que vincular las sentencias a tu consulta (Query)

por ejemplo, aqui estoy realizando un filtro en tablas .dbf que estan asignada a un Query por medio de un parametro..

Código Delphi [-]
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * From BxS Where Ficha=:VarFiltro');
Query1.Params[0].AsString:=SFicha.Text;
Query1.ExecSql;

el siguiente ejemplo estaria para realizar un filtro con la sentencia Like

Código Delphi [-]
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * From Cliente');
Query1.Sql.Add('Where Cli_Rut Like'+QuotedStr('%'+vBus.Text+'%'))
Query1.Params[0].AsString:=SFicha.Text;
Query1.ExecSql;

Espero que esto te sirva

Salu2