0
,所以我有一個非常簡單的功能在我單位:如何爲操作員分配功能?
Function AzonosE(Const n1,n2:TNap):Boolean;
Begin
AzonosE:=n1=n2;
End;
我想的(「=」)運營商分配給此功能,這樣我可以在我的這種方式主要程序中使用此功能:if n1=n2
(n1,n2:TNap;)
,所以我有一個非常簡單的功能在我單位:如何爲操作員分配功能?
Function AzonosE(Const n1,n2:TNap):Boolean;
Begin
AzonosE:=n1=n2;
End;
我想的(「=」)運營商分配給此功能,這樣我可以在我的這種方式主要程序中使用此功能:if n1=n2
(n1,n2:TNap;)
這不是標準的Pascal功能。 OTOH,afaik既不是「CONST」。你需要更好地指定你的方言/編譯器。
對於Free Pascal,Niculare對相關手冊頁的引用是正確的。儘管如此,它仍然是一種特殊的FPC。對於更實際的應用,最好查看RTL中定義複雜類型的複雜單元。
德爾福AFAIK只允許它作爲結構化類型的一部分:
http://docwiki.embarcadero.com/RADStudio/XE3/en/Operator_Overloading_%28Delphi%29
看來你正在尋找運算符重載。看看[這裏](http://www.freepascal.org/docs-html/ref/refse89.html#x191-20100015.5) – niculare 2013-03-02 12:27:32
我編輯了你的標題。請參閱:「[應該在其標題中包含」標籤「](http://meta.stackexchange.com/questions/19190/)」,其中的共識是「不,他們不應該」。 – 2013-03-02 13:36:17