[Helpix]

Подскажите пожалуйста, реально ли сделать?
Имеется класс:

Name=class(TObject)
a: integer;
b: string;
end;

Каким образом и можно ли выгнать структуру класса в xml файл, что бы получить такой результат:

<Name>
<a>
<type>integer</type>
<value>12</value>
</a>
<b>
<type>string</type>
<value>ABCD</value>
</b>
</Name>