Delphi Seattle tem uma fonte muito grande como padrão, e eu não gosto disso.

tentei mudar isso como fiz com o XE8 com um script

    Windows Registry Editor Version 5.00
    [HKEY_CURRENT_USER\Software\Embarcadero\BDS\17.0\ModernTheme]

     "FontName"="Segoe UI"

     "FontSize"=dword:0000000a

     "MainToolBarColor"="clGradientActiveCaption"

Mas não funcionou, como isso é tratado em Delphi Seattle?