如果我有兩個Table Order和OrderDetail 欄位如下 Order: sn, Amount OrderDetail: sn, OrderSn, subtotal    若建立一個ADOQuery SQL為: select  o.sn as sn1 , o.Amount, d.sn as sn2, d.ordersn, d.subtotal    from OrderDetail d inner join Order o on o.sn = d.ordersn    我的問題是: 如何在刪除(呼叫AdoQuery.Delete)時,只刪除OrderDetail的資料, 而不會刪除到Order的資料呢    我之前有試過 把sn1和Amount的keyField 設為sn1 而sn2, ordersn, subtotal的keyfield設為sn2    則執行delete時兩個表格都會刪除.... 怎麼辦呢?    K.Top是我見過最棒的程式社群
如果沒有K.Top真不知道該怎麼活

您好﹗    再加上一個ADOQuery﹐然后用SQL語法來控制只刪除Detail中鍵值相同于 ADOQuery1的當前筆資料欄位值﹒

begin
  ADOQuery2.Close;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Add('Delete From OrderDetail Where ');
  ADOQuery2.SQL.Add('sn=''' ADOQuery1.Fields.Fields[0].AsString '''');
  ADOQuery2.ExecSQL;
  ADOQuery1.Close;
  ADOQuery2.Open;
end;

========================= 我是您的朋友﹐有您真好﹗ =========================

------
忻晟

謝謝您撥空回答 可以這樣一來好像就無法使用Navigater了說 /> 如果沒有

您好﹗    可將DBNavigater元件的ConfirmDelete屬性值設為False﹐即不出現确認刪除 的對話框﹒然后將下列程式碼寫在BeforeDelete事件中﹕

begin
  if Application.MessageBox('您确定要刪除相關資料嗎﹖', '刪除确認對話
    框', MBYESNo   MB_DefButton2   MBIconQuestion   MB_ApplModal) <>
    IDYes then
  //自訂确認刪除對話框
    begin
      Abort;
    end
  else
    begin
      ADOQuery2.Close;
      ADOQuery2.SQL.Clear;
      ADOQuery2.SQL.Add('Delete From OrderDetail Where ');
      ADOQuery2.SQL.Add('sn=''' ADOQuery1.Fields.
        Fields[0].AsString '''');
      ADOQuery2.ExecSQL;
      ADOQuery1.Close;
      ADOQuery2.Open;
      Abort;
    end;
end;

========================= 我是您的朋友﹐有您真好﹗ ========================= 發表人 - cashxin2002 於 2004/11/13 18:31:00

------
忻晟

cashxin2002大大： 我在数据库中将主从表设置为级联删除，在程序中用DBNavigater元件删除时，一般会抱错（数据不一致更新），但是到后台数据库中实际相关数据已经删除了，请问该如何屏蔽该错误信息？