Hola ugezuz!
Así a primera vista, creo que el error puede estar aquí:
Código Delphi
[-]
ParamByName('CODIGOIN').AsString:= usuario; ParamByName('NOMBRE').AsString:= codigo;
Probablemente estás enviando los parámetros en el orden incorrecto y por eso la consulta no te devuelve los que esperas.
Saludos