delphi - 如何拥有没有单元别名的 Delphi XE2 项目？

Question

我想在没有单元别名的情况下编译我的 XE2 项目，但无法让它工作。

我尝试了以下方法:

1. <DCC_UnitAlias />在 *.dproj
2. <DCC_UnitAlias>$(DCC_UnitAlias)</DCC_UnitAlias>
3. <DCC_UnitAlias>;$(DCC_UnitAlias)</DCC_UnitAlias>
4. 否 DCC_UnitAlias *.dproj 中的条目

这些都会导致编译器错误
[DCC Fataler Fehler] F1030 Ungültige Compileranweisung: '-A;Generics.Collections=System.Generics.Collections;...
(翻译为类似 [DCC Fatal error] F1030 Invalid compiler directive: '-A;Generics.Collections=System.Generics.Collections;... )

或包含一些默认别名:
-AGenerics.Collections=System.Generics.Collections;Generics.Defaults=System.Generics.Defaults;WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE

我知道这不是一个大问题，但它在某种程度上让我烦恼。 :-)

FWIW:<DCC_UnitAlias />适用于 D2007。

Answer 1

在Delphi 10.1下，默认单元别名似乎无条件添加到文件$(BDS)\Bin\CodeGear.Common.Targets中。我认为它在 XE2 中类似，但没有安装来检查。

<UnitAliases>Generics.Collections=System.Generics.Collections;Generics.Defaults=System.Generics.Defaults;WinTypes=Winapi.Windows;WinProcs=Winapi.Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE</UnitAliases>
<UnitAliases Condition="'$(DCC_UnitAlias)'!=''">$(DCC_UnitAlias)$(UnitAliases)</UnitAliases>

删除第一个 UnitAliases 标签应该可以让您在每个项目的基础上更准确地指定默认值。不过，请注意此文件顶部的“请勿修改”警告。