Tdata still Up to Date ?

I understand and like it. Can you please give a small sample one class deriving from TRecord. Then I like to see if I can do the same thing using TDataRow.