[__cadetill]

Prueba con esto

 
var str : string;
begin
    str := '%' + conte.Text + '%';
    datos.obras.Filter:=comb+' like ' + QuotedStr(str);
end;

Espero te sirva