Delphi本地功能

Question

我有一个包含在delphi单元中的函数库,我们将其称为UtilitiesU.其中一些函数只是辅助函数,仅在UtilitiesU中使用.我想将这些功能的范围限制在UtilitiesU.这些是我所知道的方法:

1. 从接口中删除声明并在实现中将其依赖于其依赖项 - 函数定义的凌乱,反直觉的顺序,如果存在例如相互依赖,则不总是可能的
2. 将所有函数放入一个静态类(ala Java)中,并根据需要将它们公开或私有 - 太多样板,错综复杂
3. 声明辅助函数是使用它们的函数的局部函数 - 与第1点相同的问题

理想情况下,我想用C/C++方式来做 - 也就是说,在实现部分中将它们声明为静态.这可能吗？有没有更好的办法？

Answer 1

您仍然可以声明您的函数:

implementation

procedure ShowMe;forward;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMe;
end;

procedure showMe;
begin
  ShowMessage('Hello');
end;

因此,您可以按照所需的顺序将所有功能放在实施后.向前声明它们,并在任何你想要的地方进一步定义它们.

我个人更喜欢将这些方法声明为类方法.(让我们称之为"名字空间友好").但最终结果几乎是一样的.