Procedure TWPRTFDataContents.Assign(Source:TPersistent)Unit: WPRTEDefsClass: WPRTEDefs.TWPRTFDataContentsParameters Source:TPersistent