>LPARAMETERS nKeyCode, nShiftAltCtrl >local lcLeftString, lnLeftComma, lcRightString, lnRightComma > >if nKeyCode = 127 > lcleftString = Left(this.Value, this.SelStart) > lnLeftComma = Rat(',', lcLeftString) > lcRightString = Substr(this.Value, this.SelStart + 1) > lnRightComma = At(',', lcRightString) > this.Value = Left(this.Value, lnLeftComma) + Substr(this.Value, this.SelStart + lnRightComma + 1) > this.SelStart = lnLeftComma > nodefault >endif >>