Procedure TWPXMLOneLevel.SetSelected(x:Boolean)Unit: WPXMLintClass: WPXMLint.TWPXMLOneLevelParameters x:Boolean