* Keypress event LPARAMETERS nKeyCode, nShiftAltCtrl IF m.nKeyCode=32 AND m.nShiftAltCtrl=0 NODEFAULT PRIVATE uniqueVarSelStart IF ISNULL(M.THIS.DisplayValue) uniqueVarSelStart = 1 THIS.DisplayValue = ' ' ELSE uniqueVarSelStart = m.this.SelStart+1 THIS.DisplayValue = STUFF(M.THIS.DisplayValue,m.uniqueVarSelStart,IIF(INSMODE(),0,1),' ') ENDIF this.SelStart = m.uniqueVarSelStart ENDIF *ProgrammaticChange IF VARTYPE(M.uniqueVarSelStart)=="N" NODEFAULT ENDIFFabio