Hi Borislav

>O!
>I missed that part :-( sorry, Change the code in ADD button to be:

Saturday Night, eh! *vbg*

I have mixed matched both your codes for the working code below, for your feedback

THISFORM.LOCKSCREEN = .T.

THIS.PARENT.New()

WITH THIS.PARENT.grd
	FOR lnI = 1 TO .COLUMNCOUNT
		IF .COLUMNS(lnI).COLUMNORDER = 1
			cName = .COLUMNS(lnI)
		ELSE
			.DOSCROLL(4)
		ENDIF
	ENDFOR

	cName.SETFOCUS()
ENDWITH

THISFORM.LOCKSCREEN = .F.

I have also another thread regarding a mover container, the grid having columns that fit well within the width of the grid will by magic have horz. scroll bar and will scroll to the right most blank area. If I exit the mover and start it again the grids are behaving the way they should. This is purely VFP9 prob. I ran the same in VFP6 and this behaviour is not to be seen (Thread #1153984)