[Alfredo]

uff, se me iva...

siempre hago una limpieza antes de mandar la sentencia, asi:

Código Delphi [-]
IBSQL1.SQL.clear;
  IBSQL1.SQL.add( 'select PASSWORD_USUARIO from USUARIOS');
  IBSQL1.SQL.add('where COD_USUARIO = '+ codactual);
  IBSQL1.ExecQuery;