diff --git a/jcl/source/common/JclIDEUtils.pas b/jcl/source/common/JclIDEUtils.pas index 89981599f0..9a45a2d908 100644 --- a/jcl/source/common/JclIDEUtils.pas +++ b/jcl/source/common/JclIDEUtils.pas @@ -987,6 +987,7 @@ TBDSVersionInfo = record CppPathsKeyName = 'CppPaths'; CppPathsV5UpperKeyName = 'C++\Paths'; + CppPathsV9UpperKeyName = 'C++\Paths\Win32'; CppBrowsingPathValueName = 'BrowsingPath'; CppSearchPathValueName = 'SearchPath'; CppLibraryPathValueName = 'LibraryPath'; @@ -3689,7 +3690,12 @@ class function TJclBDSInstallation.GetCommonProjectsDirectory(const RootDir: str function TJclBDSInstallation.GetCppPathsKeyName: string; begin if IDEVersionNumber >= 5 then - Result := CppPathsV5UpperKeyName + begin + if IDEVersionNumber >= 9 then + Result := CppPathsV9UpperKeyName + else + Result := CppPathsV5UpperKeyName + end else Result := CppPathsKeyName; end;