Procedure TWPTextObj.SetEmbeddedText(x:WideString)Unit: WPRTEDefsClass: WPRTEDefs.TWPTextObjParameters x:WideString