用于单元文件中的单元文件路径

tca*_*cak 1 delphi path delphi-7 uses-clause delphi-units

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

我有一个单元,有一个类,可能会有新的功能.

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)

Del*_*ics 6

为您的单位命名不同的名称,然后您可以在项目中简单地包含这两个单位.

然后在项目选项中使用单元别名来创建"虚拟单元名称",该名称将解析为这些实际单元中的一个或另一个.在"使用"单元中,其中一个或另一个通过单元别名引用它们 - "虚拟名称".

例如在dpr中:

  uses
    ...
    UnitFile1a in '....\UnitFile1a.pas',
    UnitFile1b in '....\UnitFile1b.pas',
    ...
Run Code Online (Sandbox Code Playgroud)

在你的单位:

   uses
     UnitFile1;
Run Code Online (Sandbox Code Playgroud)

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

   UnitFile1=UnitFile1a
Run Code Online (Sandbox Code Playgroud)

要么

   UnitFile1=UnitFile1b
Run Code Online (Sandbox Code Playgroud)

然后,您可以使用"UnitFile1"中的任何一个来构建项目.通过简单地更改单位别名,单位是合适的.