Pesquisando palavra num Blob(Texto) via Sql

tenho a seguinte rotina...

if key = #13 then begin
with TqConsulta do begin
Close;
SQL.Clear;
SQL.Add(´Select * From Bloco´);
SQL.Add(´ where upper(CONTEXTO) like ´ + AnsiQuotedStr(´¬SELE¬´, ´´´));
Open;
end;


Não está funcionando....
Quero simplesmente digitar uma palavra em uma Edit e depois aplicar via sql para que obtenha os registros com este critério.

Obrigado