向Interface使用子句而不是Implementation uses子句添加单元

Question

当使用Delphi时:如果我有一个充满常量的单元,比如...

unit AConsts;
interface
const
   Const1 : WideString = 'Const1';
   Const2 : WideString = 'Const2';
   Const3 : WideString = 'Const3';
   Const4 = 100;
   Const5 = 100;
implementation
end.

我想从另一个单位使用这个单位,两者之间是否有任何区别......

unit AUnit;
interface
uses 
  AConsts;
Implementation
end.

和

unit AUnit;
interface
implementation
uses
  AConsts;
end.

？或者换句话说,就编译的应用程序而言,两者之间是否存在差异？

[编辑1]

谢谢你到目前为止的答案.

我没有把这个问题弄清楚,为此我道歉.问题不在于范围,避免循环引用等.它是关于编译应用程序的差异.也许另一个例子会有帮助.

如果UnitA,UnitB和UnitC都使用AConsts,那么在App1之间编译应用程序(假设AConsts单元和其他代码中的常量之间没有名称冲突)会有区别,其中这些UnitA,UnitB和UnitC都在接口中有AConsts section的uses子句和App2,其中UnitA,UnitB和UnitC都在Implementation部分的uses子句中都有AConsts.

Answer 1

区别在于您可以在哪里引用AConsts其界面部分中的内容.在第一个中AUnit,您可以使用Const4在该接口部分声明一个固定大小的数组.你不能在第二个那样做,AUnit因为Const4不在范围内.

它可以对编译的程序的效果,如果你不小心.假设我们有另一个单元也声明了一个名为的常量Const4:

unit BConsts;
interface
const
  Const4 = 50;
implementation
end.

现在我们UnitA像这样定义一个数组:

unit AUnit
interface
uses BConsts;
var
  data: array[0..Pred(Const4)] of Integer;
implementation
uses AConsts;
procedure Work;
var
  i: Integer;
begin
  for i := 0 to Const4 - 1 do begin
    data[i] := 8;
  end;
end;
end.

该代码将写入数组的末尾,因为Const4接口部分中的范围Const4与实现部分中使用的不同.常量不会经常发生这种情况.它通常只是两个标识符发生,FindClose在定义的函数Windows和SysUtils,并TBitmap在定义Graphics和Windows.在这两种情况下,编译器会告诉你,你做错了什么,虽然它不会准确地告诉你你已经使用了具有两种不同含义的标识符.您可以通过限定标识符来解决问题:

for i := 0 to BConsts.Const4 - 1 do
  data[i] := 8;

如果解决了上述所有注意事项,那么您的程序将编译并正确运行,那么在使用单位时没有任何区别.在您的App1和App2示例中,两个程序将是相同的.它们将不相同 - 编译器将以不同的顺序处理事物,因此可能将事物放在不同的地方 - 但它对程序的执行没有影响.