Procedure TWPCustomRtfEdit.LockScreen(allowpaint:Boolean; lock_cursorpos:Boolean)Unit: WPCTRMemoClass: WPCTRMemo.TWPCustomRtfEditParameters allowpaint:Boolean lock_cursorpos:Boolean