如何在切换主题后保留我的(自定义)IDE 配色方案?

How to keep my (custom) IDE color scheme after switching themes?

Delphi Rio 有两种配色方案:深色和浅色。
我打开 Tools->Options->Editor->Color 并更改了深色配色方案,使其更暗。

但是在切换到 'light' 主题然后回到 'dark' 主题之后,我的颜色丢失了:

我不明白这个颜色编辑器是如何工作的。如何永久保存我的颜色?

知道Delphi bug(怪不得Delphi会fall out of Tiobe index) as reported by Dalija: quality.embarcadero.com/browse/RSP-19524.

解决方法:
为 "dark" 主题设置编辑器颜色并保存密钥。
为 "light" 设置编辑器颜色并保存注册表。
当您想在主题之间切换时,关闭 Delphi 并加载注册表项。

更新:
尝试自定义对象检查器时存在类似的错误。颜色设置很多,连主题都不换!

深色主题示例:
以下是纯深色(绿色字体,黑色 bkg)主题的颜色:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight]

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Additional search match highlight] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]6202E3" "Background Color New"="[=10=]33001B"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Assembler] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]FF53BE" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Attribute Names] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clWhite" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Attribute Values] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clRed" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Brace Highlight] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]804917" "Background Color New"="[=10=]791116"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Character] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clYellow" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Code folding tree] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]597D73" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Comment] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clSilver" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Diff addition] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clNavy" "Background Color New"="clYellow"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Diff deletion] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clNavy" "Background Color New"="clRed"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Diff move] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clNavy" "Background Color New"="clBlue"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Disabled break] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]1B1514"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Enabled break] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]000F0F"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Error line] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]36234B"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Execution point] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]33001A"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Float] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]AEFFFF" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Folded code] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]00FF80" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Hex] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clFuchsia" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Hot Link] "Bold"="False" "Italic"="False" "Underline"="True" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clAqua" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Identifier] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clLime" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Illegal Char] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clRed" "Background Color New"="clWhite"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Invalid break] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]2B2B33"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Line Highlight] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="[=10=]350000"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Line Number] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]757464" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Marked block] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]F9FFD2" "Background Color New"="[=10=]CA5735"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Modified line] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]00FF80" "Background Color New"="clYellow"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Number] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clYellow" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Octal] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clFuchsia" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Plain text] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]C9FF80" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Preprocessor] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]3C92DF" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Reserved word] "Bold"="True" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="[=10=]8CFF4F" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Right margin] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clSilver" "Background Color New"="clWhite"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Scripts] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clRed" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Search match] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clBlue" "Background Color New"="clYellow"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\String] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clRed" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Structural Highlighting] "Enabled"="True" "Color1"="[=10=]FF86FF" "Color2"="[=10=]FE85CD" "Color3"="[=10=]F1A7B0" "Color4"="[=10=]E1CA7B" "FlowControlEnabled"="True" "FlowControlLocation"="1" "ShowSingleLine"="True"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Symbol] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clLime" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Sync edit background] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="True" "Default Background"="False" "Foreground Color New"="clBlack" "Background Color New"="clGray"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Sync edit highlight] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clBlue" "Background Color New"="clWhite"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Tags] "Bold"="True" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clAqua" "Background Color New"="clBlack"

[HKEY_CURRENT_USER\Software\Embarcadero\BDS.0\Editor\Highlight\Whitespace] "Bold"="False" "Italic"="False" "Underline"="False" "Default Foreground"="False" "Default Background"="False" "Foreground Color New"="clLime" "Background Color New"="clBlack"

March Headline: Delphi is about to fall out of the TIOBE index top 20