procedure TFrm_ywcl.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin IF Frm_Login.ClientDataSet2.Modified=TRUE THEN BEGIN if MessageDlg(' 数据已被修改,你想保存所作的修改吗', mtInformation, [mbYes, mbNo], 0) = mrYes then begin // 如果按下yes 就显示一个感叹号的输 出对话框 Frm_Login.ClientDataSet2. edit; Frm_Login.ClientDataSet2.Post; try Frm_Login.ClientDataSet2.ApplyUpdates(-1) ; except showmessage('数据有错误!'); end; END; END; end;
insert into 添加的记录不用ApplyUpdata(-1)进行更新,直接用ClientDataSet.Execute 更新就可以了, 但是用它添加的记录如果修改且更新数据的话,用ApplyUpdata(-1)更新不了数据,而其他正常输入的记录用ApplyUpdata(-1)可以更新,这是为什么,请大家帮忙啊!
begin
IF Frm_Login.ClientDataSet2.Modified=TRUE THEN BEGIN if MessageDlg(' 数据已被修改,你想保存所作的修改吗',
mtInformation, [mbYes, mbNo], 0) =
mrYes then
begin
// 如果按下yes 就显示一个感叹号的输 出对话框
Frm_Login.ClientDataSet2. edit;
Frm_Login.ClientDataSet2.Post;
try
Frm_Login.ClientDataSet2.ApplyUpdates(-1) ;
except
showmessage('数据有错误!');
end;
END;
END;
end;
但是用它添加的记录如果修改且更新数据的话,用ApplyUpdata(-1)更新不了数据,而其他正常输入的记录用ApplyUpdata(-1)可以更新,这是为什么,请大家帮忙啊!