Embarcadero documentation has this link as a fix.
Creating a Registry Script File
Create a new text document (you can use any text editor) and copy the
following text into it:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Embarcadero\BDS\18.0\ModernTheme]
"FontName"="Segoe UI"
"FontSize"=dword:0000000a
"MainToolBarColor"="clGradientActiveCaption"
Note: See the table of customizable values for details about the
specified values. Save the document with the .reg extension. Execute
the registry script file that you created.
A warning about changing the registry may appear. You must accept it
in order to apply the changes.
Note: You may need Administrator permissions to be able to execute
registry script files. If the IDE is open when you set or change
registry values, you must restart the IDE for the values to take
effect.