delphi - 与单元文件中的单元文件路径一起使用

Question

我有问题。我会试着解释一下。

我有一个单元，它有一个类并且可能会有新的功能。

D3BF4E849ACC45249B990F802EFB1F15\UnitFile1.pas
8DC8977E7A7B469AACFE3CC77CA7075E\UnitFile1.pas

他们都有相同的类:IClass_1 = class

我使用此文件的不同版本的代码编号。

另一个单元文件 (UnitFile2.pas) 使用该单元文件 (UnitFile1.pas)。

此外，第二个单元文件 (UnitFile2.pas) 有不同的版本。

F94C439C822E490DB228F2C16EF2C190\UnitFile2.pas
14CEEFAFF1D64DDD8CBDEDD334D4A3FF\UnitFile2.pas

它们都具有相同的类: IClass_2 = class(IClass_1)

现在问题开始了；

“F94C439C822E490DB228F2C16EF2C190\UnitFile2.pas”
需要
“D3BF4E849ACC45249B990F802EFB1F15\UnitFile1.pas”

“14CEEFAFF1D64DDD8CBDEDD334D4A3FF\UnitFile2.pas”
需要
“8DC8977E7A7B469AACFE3CC77CA7075E\UnitFile1.pas”

但是文件名是相同的(我需要这样的系统。所以它们是相同的)。在单元文件中，delphi 不允许我这样写；

在文件 F94C439C822E490DB228F2C16EF2C190\UnitFile2.pas;
在 'D3BF4E849ACC45249B990F802EFB1F15\UnitFile1.pas' 中使用 UnitFile1；

我希望我能说出我的问题。我如何告诉编译器我想使用哪个单元文件及其路径？ (我使用 Delphi-7)

Answer 1

给您的单位名称不同的名称，然后您可以简单地在项目中包含这两个单位。

然后在您的项目选项中使用单位别名来创建一个“虚拟单位名称”，该名称可解析为这些实际单位中的一个或其他。在“使用”其中一个或其他的单元中，通过单元别名 - “虚拟名称”来引用它们。

例如在 dpr:

  uses
    ...
    UnitFile1a in '....\UnitFile1a.pas',
    UnitFile1b in '....\UnitFile1b.pas',
    ...

在您的单位:

   uses
     UnitFile1;

在您的项目选项中，单位别名是:

   UnitFile1=UnitFile1a

或者

   UnitFile1=UnitFile1b

然后，您可以使用任何“UnitFile1？”来构建您的项目。只需更改单位别名即可使用单位。