保存按钮:
with form3.table1 do
begin
try
form3.table1.post;
form14.dbgrid1.Refresh;
except
showmessage('已存在这一条记录。');
end;
end;
两个问题:1:刷新不能。
2:重复按保存按钮报错。
with form3.table1 do
begin
try
form3.table1.post;
form14.dbgrid1.Refresh;
except
showmessage('已存在这一条记录。');
end;
end;
两个问题:1:刷新不能。
2:重复按保存按钮报错。
form3.table1.post;
form3.table1.close;
form3.table1.open;
begin
If form3.Table1.State in [dsEdit,dsInsert] then
Beg
try
form3.table1.post;
form14.dbgrid1.Refresh;
except
showmessage('已存在这一条记录。');
end;
End;
end;