【结贴】请先提交或者回滚数据[请求]**

jinwy

TSqldataset(DataSetBroker1.DataSet).SQLFilter:=sqlstring;
  TSqldataset(DataSetBroker1.DataSet).SQLFiltered:=true;
第一次可以，第二次再刷新就出错

对出现这样的错误“数据已经被修改,请先提交或者回滚数据 ”

如何用代码解决？

lixy

我这里没这个错误。你是怎么刷新的？

jinwy

我是这样操作的：
按条件查找到记录，放到Datagrid中，把要处理的记录打上标记，进行处理，
再次刷新，要把打上标记的记录去掉，这时就出错。

alang

提示已经非常明确了
数据已经被修改,请先提交或者回滚数

如果已经修改了数据，没有ApplyUpdates或者没有CancelUpdates，那么在设置SQLFilter时候就会报这个错误了。

lixy

主要代码贴出来

jinwy

李小毅吗？

jinwy

李小毅：
我加了一句判断就可以解决了，另有一个问题：
http://bbs.justep.com/forum.php?mod=viewthread&tid=21246
能否打印？我要用这种格式打印单据。

lixy

是。在设sqlfilter前加4楼写的方法。
procedure TMainForm.Button4Click(Sender: TObject);
begin
// DataNavigator1.Buttons[2].Caption:='test';
  TSQLDataSet(DataGrid.DataSource.DataSet).ApplyUpdates;
   TSQLDataSet(DataGrid.DataSource.DataSet).SQLFilter:='zd1=1';
      TSQLDataSet(DataGrid.DataSource.DataSet).SQLFiltered:=true;
end;

lixy

No.2

可以用表格文档单独做一个文档用来打印，在功能窗体上用DocView引用这个文档，把DocView的Visible属性设置为False，然后把打印控件的自动侦测属性去掉，把文档视图属性指定为这个DocView

----------ps
就是做一个表格文档，在后面藏着打印用。把样式做成单据的样子。表单窗体不能直接打印出来。

lisb

由于长时间没有回复，先结贴了，有问题请开新帖。