[firebase-br] Erro no IBX

[Rafael Cabral]

Pessoal,
 
Estou executando uma consulta através do componente IBQuery. Estou
utilizando o seguinte código:
 
IBQryPerm := TIBQuery.Create(nil);
IBQryPerm.SQL.Clear;
IBQryPerm.SQL.Add('SELECT * FROM USUARIO WHERE USUARIO = :USUARIO');
IBQryPerm.ParamByName('USUARIO') := TVwObjetos.Selected.Text;
IBQryPerm.Open;
 
Estou colocando um parâmetro na minha select e estou pegando um item de
TreeView selecionado.
 
Até aí funciona bem. Porém, quando o texto tem algum acento ou cedilha. Ele
me retorna o seguinte erro:
 
Project teste.exe raised exception class EIBInterbaseError with message
'arithmeric exception, numeric overflow or string truncation
Cannot transliterate character between character sets'.
Process stopped. Use Step or Run to continue.
 
Pensei que fosse o character set, mas este já está setado na conexão com o
banco:
 
  IBConn.DatabaseName := TempBanco;
  IBConn.DefaultTransaction := IBTrans;
  IBConn.LoginPrompt := False;
  IBConn.Params.Clear;
  IBConn.Params.Add('user_name=' + TempUser);
  IBConn.Params.Add('password=' + TempPass);
  IBConn.Params.Add('DEFAULT CHARACTER SET ' + TempCharset);
 
Estou utilizando D7, IBX, Firebird 2.0.
Character Set WIN1252, COLLATE PXW_INTL850
 
[]s,
 
Rafael Cabral