TSetArray Copy function