注册 登录
编程论坛 Delphi论坛

如何终止插入?

qpfmates 发布于 2008-10-15 19:24, 1156 次点击
我添加了异常处理,如果插入的信息已存在就终止插入,但代码应如何写?
1 回复
#2
ruanjian21102008-10-15 19:56
query1.close;
query1.SQL.Clear;
query1.SQL.Add('select CCID from CCInfo_VIEW  where CCID='''+cid+'''');
query1.open;
if( query1.RecordCount >0) then begin showmessage('对不起已有相同的记录');
exit;
end

[[it] 本帖最后由 ruanjian2110 于 2008-10-15 20:09 编辑 [/it]]
1