Gustav III, 1746-1792, kung av Sverige, som kronprins