TClassData.BeforeDestruction Field