一个保存的问题? 小弟想在窗体关闭是判断一个adotable的数据是否保存过,没有提示用户是否要保存,这该如何些呀,根据哪个属性?小弟在此谢了! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure Tform1.onclose(sender:Tobject);beginif MessageDlg('是否保存后退出',mtConfirmation, [mbYes,mbNo],0) = mrYes thenadoquery.post;end; 用DataSet的State属性中的 如果是dsInsert,dsEdit则提示是否保存,否则退出。 设一个全局变量,falg=false 改过了就设置成true,最后判断一下 在form的OnCloseQuery时间中写入: if table1.State in [dsInsert,dsEdit] then if MessageDlg('您尚有数据没有保存,要退出吗?',mtInformation,[mbYes,mbNO],0)=mrYes then 窗体。Close; 紧急求助谁有delphi4的安装盘 报表的简单问题 如何封装数据库链接? 求一最佳解决方案,欢迎参与讨论 我想在文件头部插入几个字节,如何操作? 关于函数和过程的添加问题? delphi3、4的控件,可以在delphi6中用么? 一个简单问题,100分,马上给分!!!!!! 特急!!!!!! 如何把integer变量值赋给数据集字段. ch81(missile) 100分求一个用Idudpserver写的检测客户端是否在线的源码. 一个关于子窗体显示的-------非常奇怪---------的问题
begin
if MessageDlg('是否保存后退出',mtConfirmation, [mbYes,mbNo],0) = mrYes then
adoquery.post;
end;
if table1.State in [dsInsert,dsEdit] then
if MessageDlg('您尚有数据没有保存,要退出吗?',mtInformation,[mbYes,mbNO],0)=mrYes then
窗体。Close;