>try with PACK or CursorFill()

I said I didn't know about the rest - but ZAP works fine





>

>PUBLIC oform1
>
>oform1=NEWOBJECT("form1")
>oform1.Show
>RETURN
>
>DEFINE CLASS form1 AS form
>
>
>	DoCreate = .T.
>	Caption = "Form1"
>	Name = "Form1"
>
>
>	ADD OBJECT grid1 AS grid WITH ;
>		Height = 200, ;
>		Left = 24, ;
>		Top = 36, ;
>		Width = 320, ;
>		Name = "Grid1"
>
>
>	ADD OBJECT command1 AS commandbutton WITH ;
>		Top = 6, ;
>		Left = 45, ;
>		Height = 27, ;
>		Width = 84, ;
>		Caption = "PACK", ;
>		Name = "Command1"
>
>
>	PROCEDURE Load
>		CREATE TABLE AA (BB I)
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		LOCATE
>	ENDPROC
>
>
>	PROCEDURE command1.Click
>		SELECT AA
>                DELETE RECORD 1
>		PACK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		APPEND BLANK
>		replace ALL bb WITH 2
>		LOCATE
>		 =m.thisform.grid1.Refresh()  && added this
>		&& BROWSE
>	ENDPROC
>
>ENDDEFINE
>