tableupdate(1,.F.,'client') && update all rows, but do not overwrite anothe user's updates. oCA.CursorRefresh() && requery the backend and refresh the gridIf I click on the delete mark column of the grid the record is deleted whether in buffer 3 or 5. Probably should have delete set on, since this permanently remove the record from the backend. Then the row in the VFP8 cursor will not be visible to tuggle back on, as this would not accomplish anything.
Do lee1.mpr Set Sysmenu Automatic connstring = "DATABASE=vfp2pg;SERVER=www.smvfp.com; port=5432;UID=VfP2Pg;pwd=HelloWorld;provider=MSDASQLR;DRIVER=postgreSQL;" the_select = "select clintmst.clientno,clintmst.firstname,clintmst.lastname,"+; "clintmst.ccompany from clintmst" oCA = createobject('CursorAdapter') with oCA .name = 'oCA' .Alias = 'client' .AllowUpdate = .T. .AllowDelete = .T. .AllowInsert = .T. .DataSourceType = 'ODBC' .DataSource = sqlstringconnect(connstring) .SelectCmd = the_select .Tables = 'clintmst' .CursorSchema = "CLIENTNO I, FIRSTNAME C(21), LASTNAME C(20), CCOMPANY C(32)" .KeyFieldList = "CLIENTNO" .UpdatableFieldList = "CLIENTNO, FIRSTNAME, LASTNAME, CCOMPANY" .UpdateNameList = "CLIENTNO CLINTMST.CLIENTNO, FIRSTNAME CLINTMST.FIRSTNAME, LASTNAME CLINTMST.LASTNAME, CCOMPANY CLINTMST.CCOMPANY" .AllowUpdate = .T. .SendUpdates = .T. .UpdateType = 1 && update .UseDeDataSource = .T. .WhereType = 1 && key field only .BufferModeOverride = 3 prep = .CursorFill() endwith browse && just added in case you don't have time to create menu/forms/etc. read events clear all close all set sysmenu to default return