lparameters nKeyCode, nShiftAltCtrl if this.maxlength > 0 if inlist(m.nKeyCode,9,13) && Tab or Enter (otherwise don't let to move focus to another control) this.StopNow = .f. endif endifIn the LostFocus:
if this.StopNow nodefault && Don't loose focus endifInteractiveChange:
if this.maxlength >0 and len(alltrim(this.text))>=this.maxlength this.StopNow = .t. * nodefault && ?? * this.value = this.value && Try to force update in the table endif>Hello