Prueba de la primera forma, pero eliminando el 5 inicial, ya que si es in campo autonumérico, no tiene sentido que le asignes un valor.
Otra opción es que ejecutes pasa a paso para ver el contenido de la propiedad o coloques un MessageBox una vez que tengas construída toda la sentencia para comprobar que es correcta.
Código Delphi
[-]
MessageDlg(usuarioADOQuery1.SQL.Text, mtInformation, [mbOK], 0);