如何使用ToolsAPI获取$(Config)的值？

Question

在使用ToolsAPI编写Delphi expert时，我们可以使用GetEnvironmentVariable来检索当前Delphi IDE进程可用的环境变量。但是，只有在当前用户帐户设置或下的Delphi环境变量设置中定义变量时，此方法才有效

Tools | Options | Environment Options | Environment Variables.

一些变量，如Delphi2010/ XE中的$(Config)，可供使用，但它不显示为环境变量。我们可以通过在详细设置中打开"Diagnostic“来获得变量列表。在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;