* Textbox.lostfocus =seek(trim(this.value),tTable,cIndex) thisform.domimic = .t. thisform.grid1.setfocus() && Needed to fire afterrowcolchange *Grid.afterrowcolchange LPARAMETERS nColIndex if thisform.domimic thisform.lockscreen = .t. do while this.relativerow > 1 && Do while we are not on first row this.doscroll(1) && Scroll down enddo this.refresh thisform.domimic = .f. && So other movement in grid doesn't scroll thisform.lockscreen = .f. thisform.text2.setfocus() && Whatever the next control to search textbox endif