>Thanks for replied Edward,
>I don't quite understand about what you mean by rewrite,
>But this is what I actually did,
>Grid.Init
>Create cursor mycursor (myfield1 C(100),myfield2 C(100))
>WITH this
>.RecordSource='mycursor'
>.RecordSourceType=1
>Endwith
>
>Listbox. interactivechange
>SELECT mycursor
>ZAP
>
>SELECT * from mytable into array myarray
>IF _TALLY<>0
>insert into mycursor from array myarray
>endif
>this.parent.mygrid.refresh()
>
>
>Then, the grid change it's position, it's still at the same position if I look at debugger window, but it change on screen, and what "messy" is the grid shape after refresh is overlapping by the grid before refresh.

You code looks Ok. I would just add around this.parent.mygrid.refresh():
select mycursor
go top
thisform.lockscreen=.t.
this.parent.mygrid.refresh()
this.parent.mygrid.setfocus
thisform.lockscreen=.f.