Procedure TWPValueEdit.UpClick(Sender:TObject)Unit: WPUtilClass: WPUtil.TWPValueEditParameters Sender:TObject