delphi cxgrid保存正在编辑的行

Posted sdlz

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi cxgrid保存正在编辑的行相关的知识,希望对你有一定的参考价值。

procedure SaveGridViewEditing(AView: TcxGridDBTableView); overload;
var
  vDst: TDataSet;
begin // 应用未保存编辑框的修改
  if (AView.DataController.EditState <> []) then
    AView.DataController.Post;
  vDst := AView.DataController.DataSet;
  if Assigned(vDst) then // 修改到数据库中
  begin
    try
      if vDst.State in [dsInsert, dsEdit] then
        vDst.Post;
    except
      on E: Exception do
        DisposeExcept(保存表格数据失败!, E);
    end;
  end
  else
    AlertMessage(保存时未找到表格对应数据集!, 2);
end;

procedure SaveGridViewEditing(AView: TcxGridDBBandedTableView); overload;
var
  vDst: TDataSet;
begin // 应用未保存编辑框的修改
  if (AView.DataController.EditState <> []) then
    AView.DataController.Post;
  vDst := AView.DataController.DataSet;
  if Assigned(vDst) then // 修改到数据库中
  begin
    try
      if vDst.State in [dsInsert, dsEdit] then
        vDst.Post;
    except
      on E: Exception do
        DisposeExcept(保存表格数据失败!, E);
    end;
  end
  else
    AlertMessage(保存时未找到表格对应数据集!, 2);
end;

 

以上是关于delphi cxgrid保存正在编辑的行的主要内容,如果未能解决你的问题,请参考以下文章