ZEOS控件中SQL语句中对中文的支持问题（100）（急急！！！！在线等待）


我现在用ZEOS来用PGSQL 来对操作数据没有想到
我在动态赋语句时  其中有一句是  
ZbomQuery.Sql.Add('select Factory_serial  from Eng_Matrial where types='''
                  +'成品'+''' and not exists (select * from bom   where Eng_Matrial.Factory_serial=bom.F_m_serial)');
总是取不出数据 但是在ZBOMQUERY.sql中静态赋上面的SQL时能取到值。
后来跟踪发现。在ZCONVERT控件中有一个XCONVERT如下对SQL 语句进行了转换
‘成品‘变成了’成？‘ 各位有什么好办法呀 。 
{ Local convertion }
function XConvert(Value: string; Table: PChar): string;  //此处对多国语言存var
  Ptr: PChar;
begin
  Ptr := PChar(Value);
  while Ptr^ <> #0 do
  begin
    if (Ptr^ >= #128) and (Table[Ord(Ptr^)-128] <> #0) then
      Ptr^ := Table[Ord(Ptr^)-128];
    Inc(Ptr);
  end;
  Result := Value;
end;各位有什么好办法呀 语句进是'select Factory_serial  from Eng_Matrial where types='成品' and not exists (select * from bom   where Eng_Matrial.Factory_serial=bom.F_m_serial)'
出来就变成了'select Factory_serial  from Eng_Matrial where types='成？' and not exists (select * from bom   where Eng_Matrial.Factory_serial=bom.F_m_serial)'
各位老兄谁用过ZEOS  
对这有什么好办法。 我有点不敢改了，各位有帮帮忙