Let $H$ be a Hilbert space, and let $T \colon H \to H$ satisfy $$\langle Tx, Tx \rangle = \langle x, x \rangle \ \mbox{ for all } \ x \in H.$$ Then $T$ is bounded and norm $\Vert T \Vert = 1$ (unless $H = \{0\}$ in which case $T = 0$ also and so $\Vert T \Vert = 0$). So the Hilbert adjoint operator $T^*$ of $T$ exists.
Let $I$ denote the identity operator on $H$.
Then how to show that $T^* T = I$?
My effort:
Since $$\langle Tx, Tx \rangle = \langle x, x \rangle \ \mbox{ for all } \ x \in H,$$ therefore, by using the definition of $T^*$, we obtain $$\langle T^* T x, x \rangle = \langle Tx, Tx \rangle = \langle x, x\rangle \mbox{ for all } \ x \in H;$$ so $$\langle T^* T x - x, x \rangle = 0 \ \mbox{ for all } \ x \in H.$$ If $H$ is complex, then this last equality implies that $$T^* T x = x \ \mbox{ for all } \ x \in H,$$ as required. Am I right?
What if $H$ is real?
We have $$\left< T(x+y) , T(x+y ) \right> = \left< x+y , x+y \right>$$ hence $$\mbox{Re}\left< Tx , Ty \right> = \mbox{Re}\left< x , y \right>$$ and analogously $$\left< T(x+iy) , T(x+iy ) \right> = \left< x+iy , x+iy \right>$$ hence $$\mbox{Im}\left< Tx , Ty \right> = \mbox{Im}\left< x , y \right>$$ therefore $$\left< Tx , Ty \right> = \left< x , y \right>$$ for all $x,y\in H.$
So $$\left< x , y \right>=\left< Tx , Ty \right> =\left< T^*Tx , y \right>$$ thus $$0=\left< T^*Tx -x , y \right>$$ for all $y\in H$
hence $$T^*T x=x $$