delphi XE多单元命名空间问题

发布于 2024-11-07 08:05:38 字数 1275 浏览 0 评论 0原文

我正在阅读 Delphi XE 中的 RAD Studio 文档。 这里有一些文字。

[ Delphi 参考 -> Delphi语言指南->课程和单元 ->使用命名空间 ->搜索命名空间 ->多单元命名空间]

多单元命名空间

如果单元声明引用相同的命名空间,则多个单元可以属于同一命名空间。 例如,可以创建两个文件,unit1.pas 和unit2.pas,并带有以下单元声明:

// in file 'unit1.pas' 
unit MyCompany.ProjectX.ProgramY.Unit1 

// in file 'unit2.pas' 
unit MyCompany.ProjectX.ProgramY.Unit2 

在此示例中,命名空间 MyCompany.ProjectX.ProgramY 逻辑上包含 unit1.pas 和 unit2.pas 中的所有接口符号。

命名空间中的符号名称在命名空间中的所有单元中必须是唯一的。
在上面的示例中,Unit1 和 Unit2 都定义名为 mySymbol 的全局接口符号是错误的

我对此进行了测试。 代码如下。

----------------------------------------------------------------- 
program Project1; 

{$APPTYPE CONSOLE} 

uses 
  SysUtils, 
  Lib.A in 'Lib.A.pas', 
  Lib.B in 'Lib.B.pas'; 

begin 
  WriteLn ( TestValue ) ; 
  ReadLn ; 
end. 
----------------------------------------------------------------- 
unit Lib.A; 

interface 
  const TestValue : Integer = 10 ; 
implementation 

end. 
----------------------------------------------------------------- 
unit Lib.B; 

interface 
  const TestValue : Integer = 10 ; 
implementation 

end. 

这不是错误。为什么?我不明白。

I am reading RAD Studio Documentaion in Delphi XE.
here a some texts.

[ Delphi Reference -> Delphi Language Guide -> Programs and Units -> Using Namespaces -> Searching Namespaces -> Multi-unit Namespaces ]

Multi-unit Namespaces

Multiple units can belong to the same namespace, if the unit declarations refer to the same namespace.
For example, one can create two files, unit1.pas and unit2.pas, with the following unit declarations:

// in file 'unit1.pas' 
unit MyCompany.ProjectX.ProgramY.Unit1 

// in file 'unit2.pas' 
unit MyCompany.ProjectX.ProgramY.Unit2 

In this example, the namespace MyCompany.ProjectX.ProgramY logically contains all of the interface symbols from unit1.pas and unit2.pas.

Symbol names in a namespace must be unique, across all units in the namespace.
In the example above, it is an error for Unit1 and Unit2 to both define a global interface symbol named mySymbol

I tested this.
code below .

----------------------------------------------------------------- 
program Project1; 

{$APPTYPE CONSOLE} 

uses 
  SysUtils, 
  Lib.A in 'Lib.A.pas', 
  Lib.B in 'Lib.B.pas'; 

begin 
  WriteLn ( TestValue ) ; 
  ReadLn ; 
end. 
----------------------------------------------------------------- 
unit Lib.A; 

interface 
  const TestValue : Integer = 10 ; 
implementation 

end. 
----------------------------------------------------------------- 
unit Lib.B; 

interface 
  const TestValue : Integer = 10 ; 
implementation 

end. 

This is not error. Why? I don't understand.

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(2

终难遇 2024-11-14 08:05:39

您的代码与文档不匹配。文档明确指出“unit MyCompany.ProjectX.ProgramY.Unit1”的文件名是unit1.pas,而不是MyCompany.ProjectX.ProgramY.Unit1。

然而,我认为这个功能根本没有实现。如果我更改您的代码以将第一个单元存储在文件 a.pas 中,将第二个单元存储在文件 b.pas 中,则单元根本不会编译,错误是

[DCC Error] A.pas(1): E1038 Unit identifier 'Lib.A' does not match file name

(这正是我期望看到的。)

在您的情况下,有没有冲突,因为您始终可以使用“冲突”全局的全名 - Lib.A.TestValue 和 Lib.B.TestValue。

Your code does not match the documentation. Documentation explicitly states that file name of 'unit MyCompany.ProjectX.ProgramY.Unit1' is unit1.pas, not MyCompany.ProjectX.ProgramY.Unit1.

I do not believe, however, that this feature is implemented at all. If I change your code to store first unit in file a.pas and second unit in file b.pas, units don't compile at all and the error is

[DCC Error] A.pas(1): E1038 Unit identifier 'Lib.A' does not match file name

(Which is exactly as I was expecting to see.)

In your case there's no conflict because you can always use a full name of 'conflicting' global - Lib.A.TestValue and Lib.B.TestValue.

泪之魂 2024-11-14 08:05:39

在 Delphi.NET 中(Prism 之前):单元名称 = 命名空间。这就是他们当时使用它的方式 - 在 dotNET 中,单元实际上是一个名称空间(包括在生成的 IL 中出现的名称空间)。

在本机 Delphi 中,我看不出有什么区别(如果存在的话)。

In Delphi.NET (before Prism): unit name = namespace. That's the way they used it in that time - and in dotNET an unit was really an namespace (inclusive appear as such in generated IL).

In native Delphi, I don't see the difference (if that exists at all).

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文