>If i change row it is update, but if change column is not updated
>
>i am not working with table buffering, is a readwrite resulting cursor from a select statement.

If you change column it's not updated? Are you sure. Try this:

Public oForm
oForm = Createobject("myForm")
oForm.Show

Define Class myForm As Form
  DataSession=2
  Add Object myGrid As Grid

  Procedure Load
    Select * From ;
      (_samples+'data\customer') ;
      into Cursor crsTest Readwrite
    Use In 'customer'
  Endproc

  Procedure Init
    With This.myGrid
      For ix=1 To .ColumnCount
        With .Columns(m.ix)
          .AddObject("myTextbox","myTextBox")
          .CurrentControl="myTextbox"
          .myTextbox.Visible = .T.
        Endwith
      Endfor
    Endwith
  Endproc
Enddefine

Define Class myTextbox As TextBox
  Procedure LostFocus
    Messagebox(This.Parent.ControlSource + ":" + ;
      Transform(Evaluate(This.Parent.ControlSource)))
  Endproc
Enddefine

Cetin