cxGrid自动保存当前单元格输入的数据

Posted kinglandsoft

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了cxGrid自动保存当前单元格输入的数据相关的知识,希望对你有一定的参考价值。

遇到的问题,利用cxGrid做数据录入界面,当用户在一个单元格中录入数据,没有回车,然后直接点工具条上的保存按钮,执行数据提交,结果当前输入的内容丢掉了,又回到输入前的值。

在群中求助,得到好多朋友的支持,这里先感谢了,最终明白大家的说法,并成功解决掉了这个问题。

在这种情况下,与cxGrid的实现机制有关系,也就是说,点击工具条上的按钮,没有发生焦点变换,这时候cxGrid认为自己的用户没有输入完成,继续等用户输入。

理解了这种情况,有一种解决方法,就是在点保存按钮时,强制调用Self.SetFocus,这里Self指Form;另外一种解决方法,就是调用cxGrid提供方法,强制提交数据。

看下面的代码,按大家的提法,有很多写法:

procedure Tsys_AddressBTDoc.UpdateData(aTableView: TcxGridDBTableView);
var
  AValue:Variant;
begin
  if aTableView.DataController.IsEditing then
  begin
    //这是一种方法
    //AValue:=TcxCustomTextEdit(aTableView.DataController.Controller.EditingController.Edit).Text;
    //aTableView.dataController.DataSet.Edit;
    //aTableView.dataController.DataSet.FieldByName(‘fname‘).AsString:=AValue;
    //aTableView.dataController.DataSet.Post;

    //这是一种方法
    //aTableView.Controller.EditingController.HideEdit(True);

    //这是一种方法
    //aTableView.Controller.EditingController.Edit.PostEditValue;

    //这是一种方法
    //aTableView.dataController.DataSet.Post;

    //这是一种方法
    aTableView.dataController.UpdateData;
  end;
end;

参数是cxGrid的一个视图。如下图,指ShiTableView。

技术图片

 

 

当点击保存按钮,执行这个方法,强制cxGrid提交数据。

UpdateData(ShiTableView);

写出这样的结果,看似简单,我确用了好几个小时,因为产生一种现象,就是用户第一次输入,执行上面的动作,数据得不到保存,第二次及以后则正常。最后查明,原来我的ShiTableView还使用了事件:ShiTableViewFocusedRecordChanged

在这个事件上,我做了调入其他cxGrid需要的数据,正是这个事件造成第一次执行错误。用代码在执行UpdateData前去掉这个事件,执行后再恢复事件。最终的代码变成这样:

procedure Tsys_AddressBTDoc.actSaveExecute(Sender: TObject);
begin

  DisableFocusedRecordChanged;
  try
     //Self.SetFocus;//这是一种强制保存当前cxGrid输入的内容的方法
     UpdateData(ShiTableView); //这是一种强制保存当前cxGrid输入的内容的方法
     Save;
  finally
     EnableFocusedRecordChanged;
  end;

end;

最终,还有一点要说明,SetFocus与UpdateData的区别:

如果用SetFocus,会使cxGrid没有了焦点,用户要继续操作cxGrid,就需要mouse点击一下,让cxGrid重新得到焦点,对于连续输入来说,不方便。而UpdateData方法,要写更多的代码,使得代码偶合增加,有利有憋,自己把握了!我最后用的UpdateData方法。

这是最后完成的界面:

技术图片

 

再一次感谢群友们的指导与帮助!

 

以上是关于cxGrid自动保存当前单元格输入的数据的主要内容,如果未能解决你的问题,请参考以下文章

cxGrid 单元格回车移到下一行,当移到最后一个单元格时回车新增一行

delphi中,cxgrid怎样将选中的单元格都赋为选中的第一行的值,并且数据集也同步更新

CxGrid 改变某行或单元格的颜色

EXCEL中如何根据公式自动求出当前单元格的值?

求EXCEL VBA代码。单元格输入内容保存后自动锁定有内容单元格。下次打开后不可编辑。

cxGrid动态设置单元格对齐方式