Question

所以我的单位功能非常简单：

Function AzonosE(Const n1,n2:TNap):Boolean;
Begin
    AzonosE:=n1=n2;
End;

我想将（'='）运算符赋给这个函数，这样我就可以这样在我的主程序中使用这个函数：if n1=n2（n1，n2：TNap;）

Answer 1

这不是标准的Pascal功能。 OTOH，afaik既不是＆＃34; CONST＆＃34;。您需要更好地指定您的方言/编译器。

对于Free Pascal，Niculare对相关手册页的引用是正确的。虽然这是FPC特定的。对于更实际的应用，最好查看定义复杂类型的RTL中的ucomplex单元。

Delphi afaik只允许它作为结构化类型的一部分：