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

[klionsis]

Gracias BlueSteel por tu respuesta, pero eso no es justamento lo que quiero cambiar. Yo no quiero vincular la sentencia a la consulta, si no lo que quiero es pasar el parámetro:

Query1.Close;
Query1.Sql.Clear;
Query1.ParamsbyName['pCodigo'].AsString:='123';
Query1.Open;


y en la propiedad "Sql" del componente tQuery ingresar la consulta:

Select *
from Linea
Where
Codigo like % Codigo %


pero esto no me funciona. Espero ser entendible.

Gracias.