Procedure TWPFont.AssignTo(Dest:TObject)Unit: WPRTEDefsClass: WPRTEDefs.TWPFontParameters Dest:TObject