procedure TForm7.Label33Click(Sender: TObject);var i,j,k:integer;begin
i:=self.DBGrid1.SelectedField.DataSet.FieldValues['id'];
self.ClientDataSet1.Edit ; self.ClientDataSet1.FieldValues['id']:=1111111; self.ClientDataSet1.Post;
end;