Delphiでのインスタンス参照ですか？

Question

C++で 'this'と同等のDelphiは何ですか？その使用例をいくつか教えてください。

Answer 1

ほとんどの場合、方法ではselfを使用しないでください。

実際には、それはあなたが、クラスのプロパティとメソッドにアクセスする暗黙のself.プレフィックスは、クラスメソッド内で、あったかのようだ：

type 
    TMyClass = class 
    public 
    Value: string; 
    procedure MyMethod; 
    procedure AddToList(List: TStrings); 
    end; 


procedure TMyClass.MyMethod; 
begin 
    Value := 'abc'; 
    assert(self.Value='abc'); // same as assert(Value=10) 
end; 

selfあなたが現在を指定したいときに使用しますオブジェクトを別のメソッドまたはオブジェクトに変換します。例えば

：この上記のコードはTMyClassインスタンスを指しList.Objects []と、TStringsリストに項目を追加する

procedure TMyClass.AddToList(List: TStrings); 
var i: integer; 
begin 
    List.AddObject(Value,self); 
    // check that the List[] only was populated via this method and this object 
    for i := 0 to List.Count-1 do 
    begin 
    assert(List[i]=Value); 
    assert(List.Objects[i]=self); 
    end; 
end; 

。そして、それがこれがリストのすべての項目の場合に当てはまることを確認します。

Answer 2

デルファイでは、Selfはこれに相当します。また、hereに記載されているように割り当て可能です。