Procedure TWPTextObj.SetWidth(x:Integer)Unit: WPRTEDefsClass: WPRTEDefs.TWPTextObjParameters x:Integer