Fórum Alguém pode me ajudar a encontrar o erro neste código? #201276

Alguém pode me ajudar a encontrar o erro deste pequeno código?
Quando utilizo este código dá certo:

if rglocalizar.itemindex=1 then
begin
with frm_lei_ordinaria.Query1 do
begin
close;
sql.clear;
sql.add(´select * from lei_ordinaria´);
sql.add(´where upper (data) like :1´);
params[0].asstring:=uppercase(´¬´+editlocalizar.text)´¬´;
prepare;
open;
end;
end;

Mas, quando utilizo a função POS não dá certo. Onde está este erro?
Alguém pode me ajudar a encontrar?

if rglocalizar.itemindex=2 then
begin
with frm_lei_ordinaria.Query1 do
begin
close;
sql.clear;
sql.add(´select * from lei_ordinaria´);
sql.add(´where (lei_integral) like :1´);
params[0].asInteger:=Pos(Editlocalizar.Text, ´´);
end;
end;

Obrigado pela atenção.