我收到以下错误:
项目 PAT_p.exe 引发异常类 EOleException,并带有消息“无法删除或更改记录,因为表 'tblAntwoorde' 包含相关记录”。进程停止。使用 Step 或 Run 继续。
在以下代码中第一次执行时会发生此错误:
procedure TfrmKomp.btnTerug1Click(Sender: TObject);
begin
frmData.qryVGKompetisieDB.Active := false;
frmData.qryVGKompetisieDB.SQL.Text := 'Delete * from tblDeelnemers'; // delete from table1
frmData.qryVGKompetisieDB.ExecSQL;
frmData.qryVGKompetisieDB.SQL.Text := 'Delete * from tblAntwoorde'; // delete from table2
frmData.qryVGKompetisieDB.ExecSQL;
frmData.qryVGKompetisieDB.SQL.Text := 'SELECT * from tblDeelnemers'; // for displaying on dbgrid that records is removed
frmData.qryVGKompetisieDB.Active := true;
end;
我的数据库中的表以一对多的关系链接,其中 ID 是 tblDeelname 中的 PK,Nommer 是自动编号,而 tblAntwoorde 中的 PK。不幸的是,这是针对学校的实际评估任务,并且必须存在这种关系。
我想删除表中的所有数据,但表必须与所有列一起保留在那里。这不一定必须使用 sql 语句,我可以在 delphi7 中使用的任何类型的代码都可以。