Procedure TWPTextObj.SetSource(x:string)Unit: WPRTEDefsClass: WPRTEDefs.TWPTextObjParameters x:string