ADO如何保存ASC码大于128的字符？

Question

ADO如何保存ASC码大于128的字符？
如下：
a:='AA'+char(167);
with AdoQuery1 do
begin
  close;
  sql.clear;
  sql.add('insert into table(fa) values('''+a+''')');
  execsql;
end;
执行时，提示错误，好象是右边少了一个单引号，但这在BDE中
可以正常执行啊。怎么回事？

Answer 1

a:='AA'+char(167);
with AdoQuery1 do
begin
  close;
  sql.clear;
  sql.add('insert into table(fa) values(:aaa)');
  Parameters.ParamValues['aaa'] := a;
  execsql;
end;

Answer 2

这种方法是可以，但是如果直接用SQL语句组装，不用参数来做，
有别的方法可以实现吗？