\newcommand\KompNr{\stepcounter{kompzaehl} \hspace*{\fill}{\scriptsize \newcommand\KompNr{\stepcounter{kompzaehl}\hspace*{\fill}{\scriptsize (K%
      \ifnum\thekompzaehl<1000 0\fi
      \ifnum\thekompzaehl<100  0\fi
      \ifnum\thekompzaehl<10   0\fi\thekompzaehl)}}
Oder mal bei `siunitx` nachschauen, ob es nicht ein Makro dafür gibt.