Delphi MIDAS 的重大BUG / 李颖(300分)

@_@

好文章，我的问题解决了，温故而知新。。。

季颖： 有问题：我采用您这样方法，在保存表格数据时，有一些非空的的字段我没有输入
保存时当然出错啦，填完这些非空数据，并进行保存（ApplyUpdates（-1））时又出错了：
Record not found or changed by another user，请帮忙，谢谢！

李兄，说个题外话，你的不缺少password文件的dbbackup控件在哪里可以下载，急需看里面的代码！！

lis

adminis，数据提交的问题已解决，
我是这么干的：
在ClientDataSet.BeforeApplyUpdates中传入SQL语句
在Provider.BeforeApplyUpdates中将得到的SQL语句赋值给TQuery.SQL.Text
程序如下：
Client端：
procedure xxxx.ClientDataSetBeforeApplyUpdates(Sender: TObject;
var OwnerData: OleVariant);
begin
with Sender as TClientDataSetdo
OwnerData := CommandText;
end;

Server端：
procedure xxxx.ProviderBeforeApplyUpdates(Sender: TObject;
var OwnerData: OleVariant);
begin
qrDataProvider.SQL.Text := OwnerData;//此句怎解?
end;