TDataList: added Assign()