2013-03-02 82 views
0

,所以我有一個非常簡單的功能在我單位:如何爲操作員分配功能?

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

我想的(「=」)運營商分配給此功能,這樣我可以在我的這種方式主要程序中使用此功能:if n1=n2(n1,n2:TNap;)

+2

看來你正在尋找運算符重載。看看[這裏](http://www.freepascal.org/docs-html/ref/refse89.html#x191-20100015.5) – niculare 2013-03-02 12:27:32

+0

我編輯了你的標題。請參閱:「[應該在其標題中包含」標籤「](http://meta.stackexchange.com/questions/19190/)」,其中的共識是「不,他們不應該」。 – 2013-03-02 13:36:17

回答

1

這不是標準的Pascal功能。 OTOH,afaik既不是「CONST」。你需要更好地指定你的方言/編譯器。

對於Free Pascal,Niculare對相關手冊頁的引用是正確的。儘管如此,它仍然是一種特殊的FPC。對於更實際的應用,最好查看RTL中定義複雜類型的複雜單元。

德爾福AFAIK只允許它作爲結構化類型的一部分:

http://docwiki.embarcadero.com/RADStudio/XE3/en/Operator_Overloading_%28Delphi%29