Fórum Parâmetro em SQL #209006

Pessoal

Estou usando 2 rotinas de programação.

PRIMEIRA:

with DmDados,QuerOrdemSelecao do
begin
close;
sql.Clear;
sql.add(´select * from tbOrdem´);
sql.add(´where upper(NomCliente) like :Cli order by NomCliente´);
Parambyname(´Cli´).Value := edConsulta.text;
open;
end;

SEGUNDA:

with QuerOrdemSelecao,sql do
begin
Clear;
add(´Select * from TbOrdem´);
add(´Where DataEntrada >=:dDataIni and DataEntrada <=:dDatafin and´);
add(´tipo = ´O´´ );

Parambyname(´dDataini´).Value := StrToDate(MskDataini.Text);
Parambyname(´dDatafin´).Value := StrToDate(MskDatafin.Text);
Open;
end;

Quando vai executar a linha de código:

with DmDados.QuerOrdemSelecao do
begin
Active:=false;
Params[0].AsString:= ´¬´ + edConsulta.Text + ´¬´;
Active :=true;
end;

Aparece a mensagem: TYPE MISMATCH IN EXPRESSION: É que primeiro executei a rotina debaixo depois executei a rotina de cima o que estou entendo é o parâmetro que não está fechando

Como proceder ????