InheritsFromとis演算子の違いは何ですか？私が覚えて、すべてのケースでは、次の手順では、同じ結果を

Question

を与える：

type 
    TMyClass = class(TObject); 
    TMyChildClass = class(TMyClass); 

var 
    MyObj : TMyChildClass; 

procedure TForm1.Test(); 
var 
    ResultA : Boolean; 
    ResultB : Boolean; 
begin 
    //Using TObject.InheritsFrom 
    ResultA := MyObj.InheritsFrom(TMyClass); 

    //Using 'is' operator 
    ResultB := MyObj is TMyClass; 

    //Showing results 
    ShowMessage(
    'InheritsFrom = ' + BoolToStr(ResultA, True) + sLineBreak + 
    'is = ' + BoolToStr(ResultB, True) 
); 
end; 

ではなくTObject.InheritsFrom機能のis演算子を使用して、いくつかの違いはありますか？

Answer 1

isオペレータは、InheritsFromの上に構築されます。だから、

obj is TSomeClass 

はInheritsFromはインスタンスメソッドであるように見えるので、表現obj.InheritsFrom(TSomeClass)は、おそらく少し混乱して

(obj <> nil) and obj.InheritsFrom(TSomeClass) 

として実装されています。実際にはInheritsFromはクラスメソッドであり、ランタイムクラスobjはInheritsFromにSelfポインタとして渡されます。

基本的にisとInheritsFromは、少なくとも注意をクラスに限定するときは同じタスクを実行します。 isがより一般的であり、たとえばインタフェースなどでも使用できることに注意してください。

明らかな構文上の違いがあります。すなわち、isにはインスタンスが必要ですが、InheritsFromはクラス関数です。これまでのように、Delphi言語はインスタンス参照でクラス関数を呼び出すことをサポートしています。もう1つの違いは、isにnilリファレンスの組み込みテストがあることです。

これらは単なる構文上の違いですが、基本的な操作は同じです。isがInheritsFromを呼び出していることからもわかります。

Answer 2

はい、違いがあります。 InheritsFromはクラス関数であり、その主な目的はクラスIS（あるクラスから継承）かどうかをテストすることです。

クラスにis演算子を使用することはできません。

TMyChildClass is TMyClassはコンパイルされませんが、代わりにTMyChildClass.InheritsFrom(TMyClass)を使用できます。