【搞定】[请求]关于关闭窗口时出现的数据未保存提示问题**

lisb · 发表于 2007-8-9 10:26:56

那你就自己在onCloseQuery事件里自己弹出窗体来做判断
procedure TVenderForm.BizFormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose:= true;
  if (DataSetBroker.DataSet.State in [TDataSetState.dsInsert,TdataSetState.dsEdit]) or
DataSetBroker.DataSet.UpdatesPending then
  begin
if jsdialogs.ConfirmBox('数据尚未保存，保存吗？','提示信息',1) then
begin
if DataSetBroker.DataSet.State in [TDataSetState.dsInsert,TdataSetState.dsEdit] then
   DataSetBroker.DataSet.Post;

   DataSetBroker.DataSet.ApplyUpdates;
end
else
   DataSetBroker.DataSet.Cancel;
  end;
end;

yancm · 发表于 2007-8-9 10:42:59

写在从数据集的AfterPost里面可以解决楼主的需求。
如果只统计从数据集的一个字段，也可以写在这个字段的OnExit中

liso · 发表于 2007-8-9 14:13:48

我先试试11楼的办法,谢谢

lixy · 发表于 2007-8-13 09:33:54

楼主请反馈

liso · 发表于 2007-8-13 11:31:05

前几天出差,还没试.

liso · 发表于 2007-8-13 11:32:45

如果我要直接调用导航条上的保存按钮进行保存,代码应该怎么写

lisb · 发表于 2007-8-13 13:56:41

DataSetBroker.DataSet.ApplyUpdates;

jiahaiminghr · 发表于 2007-9-13 16:29:08

由于长时间没有反馈，先结贴了，
有问题请开新贴！

		自动登录	找回密码
密码			立即注册