Not quite what you are looking for, but you can use RTTI to access the values โโof various published properties. The magic routines are in the TypInfo module. The ones you are probably most interested in are GetPropList, which will return a list of object properties and GetPropValue, which will allow you to get property values.
procedure TForm1.DumpObject( YourObjectInstance : tObject );
var
PropList: PPropList;
PropCnt: integer;
iX: integer;
vValue: Variant;
sValue: String;
begin
PropCnt := GetPropList(YourObjectInstance,PropList);
for iX := 0 to PropCnt-1 do
begin
vValue := GetPropValue(YourObjectInstance,PropList[ix].Name,True);
sValue := VarToStr( vValue );
Memo1.Lines.Add(PropList[ix].Name+' = '+sValue );
end;
end;
, DumpObject (Self) . , TPersistent, {$ M +} .
, Delphi (, 2010) "", .