Define Record methods using RTTI

[DueA_as_Rodriguez_Francisco_Armando (Dueñas Rodriguez Francisco Armando)]

Add feature to function DefineRecordByRTTI to define also record methods, also convert the procedure DefineRecordByRTTI to a function that can return a TatClass reference to the new defined record

[wlandgraf (Wagner Landgraf)]

This feature was implemented.