function - 如何为函数/过程创建别名？

Question

在 Delphi 中，有没有办法将一个过程声明为另一个过程的别名？像这样的东西:

function AnAliasToUpperCase(const S: AnsiString): AnsiString = system.AnsiStrings.UpperCase;  

以及稍后在程序中调用AnAliasToUpperCase或UpperCase必须完全相同。

Answer 1

定义它，例如就像一个常量声明:

const
  AliasToUpperCase: function(const S: AnsiString): AnsiString = System.AnsiStrings.UpperCase;

可能适合您的需求。