Jak uzyskać dostęp do pola w Delphi za pomocą RTTI?

Question

Rozważmy następujący:

TFieldType = class 
    fValue: string; 
end; 

TMainClass = class 
private 
    Ffield: TFieldType; 
public 
    function GetValue: string; 
end; 

W TMainClass.GetValue Próbuję uzyskać wartości TMainClass dziedzinach:

function TMainClass.GetValue; 
begin 
    vCtx := TRTTIContext.Create; 
    vType := vCtx.GetType(Self.ClassInfo); 
    for vField in vType.GetFields do 
    vField.GetValue(
     //Here's the trouble, because i don't know how to get the instance 
    ); 

Może istnieje inny sposób na uzyskanie wartości pól, które są przypadki kolejne zajęcia?

Answer 1

musiał przejść instancję jako parametr getValue jak

vField.GetValue(self);

Dla lepszego zrozumienia RTTI przeczytać remarkable articles about RTTI Robert Love. W tym problemie szczególnie ten o Properties and Fields.