Comando like con caracteres especiales

[comba]

Hola a todos

Utilizo delphi6 y sql server 2000.
Cuando utilizo una consulta con el comando like pero el parametro contiene el caracter ' hace que el programa muestre un error.

Select Nombre from Poblaciones,Calles
where Poblaciones.id =Calles.idpob');
and Poblaciones.Nombre like '+#39+'%'+Edit1.text+'%'+#39);


¿Como puedo hacer para que la consulta no me de ese error?.
¿Puedo utilizar otro comando diferente del like?

Gracias de antemano

[ContraVeneno]

Código Delphi [-]
TuQuery.SQL.Add('and Poblaciones.Nombre like ''%'+Edit1.text+'%'' ');

TuQuery.SQL.Add('and Poblaciones.Nombre like '+QuotedStr('%'+Edit1.text+'%'));

[comba]

Problema solucionado, gracias por la ayuda