Gustav III., Schweden, König