RTTIを使用して変数名を取得

Question

私はこのようにRTTIを使用して変数名を取得しようとしています。

ここは私のテストです。

type 
    TStringHelper = record helper for string 
    function Name: string; 
    end; 

    TMyRecord = record 
    Field1:string; 
    end; 

implementation 

{ TStringHelper } 
function TStringHelper.Name: string; 
var 
context : TRttiContext; 
begin 
context := TRttiContext.Create; 
result := context.GetType(@Self).Name; // return empty 
context.Free; 
end; 

procedure TForm2.FormCreate(Sender: TObject); 
var 
r : TMyRecord; 
begin 
    ShowMessage(r.Field1.Name); 
end; 

TRttiTypeの戻り値は空です。

変数名を取得する方法はありますか？

Answer 1

RTTIは、変数ではなく型についての情報を提供します。一般に、RTTIを使用して、変数のアドレスを指定してその名前を見つける方法はありません。

RTTIだけでなく、文字列オブジェクトのメソッドとして試みていることは実際には不可能です。同じオブジェクトを参照する2つの変数があるシナリオを想像してみてください。

S := 'foo'; 
T := S; 

ここで単一文字列オブジェクトの名前は何ですか。それはSですか、それともTですか？