2,497
社区成员
发帖
与我相关
我的任务
分享
//你可以在Edit22onchange事件写
var ChangTing: boolean;
begin
ChangTing:= true;
DataModule1.ADOQuery4.Edit;
DataModule1.ADOQuery4.FieldValues['opinion']:= Edit22.text;
end;
//关闭的时候
if ChangTing = true then
begin
if messagebox(handle,'是否保存更新信息?', '询问', Mb_YESNO) = idyes then
DataModule1.ADOQuery4.post;
end;