delphi - 如何使用 ToolsAPI 检索 $(Config) 的值？

Question

当使用ToolsAPI编写Delphi Expert时，我们可以使用GetEnvironmentVariable来检索当前Delphi IDE进程可用的环境变量。然而，只有在当前用户帐户设置或 Delphi 的环境变量设置中定义变量时，这才有效。

Tools | Options | Environment Options | Environment Variables.

Delphi 2010/XE 中的 $(Config) 等变量可以使用，但不会显示为环境变量。我们可以通过在详细设置中打开“诊断”来获取变量列表。在 Delphi IDE 中编译项目时，$(Config) 变量出现在诊断输出中。

有没有办法在ToolsAPI中检索$(Config)的值？

Answer 1

项目的 ProjectOptions 属性可以转换为 IOTAProjectOptionsConfigurations。

var
  Project: IOTAProject;
begin
  // ... obtain reference to the project
  ShowMessage((Project.ProjectOptions as IOTAProjectOptionsConfigurations).ActiveConfigurationName);
end;