Commit edilmemis kaydin silinmesi

[mrtblt]

Merhaba

Dbgrid uzerinde veri girisi yapiyorum. Veri girisi bittikten sonrada asagidaki kodla islemi sonlandiriyorum.

Kod: Tümünü seç

        
        dm.q_piesehead.Post;
        dm.ds_pieselines.AutoEdit := false;
        dm.neyserv.DefaultTransaction.CommitRetaining;

Dbgride verigirisi esnasinda kullanici henuz commit edilmemis bir satiri silmek istediginde asagidaki kodu calistiriyorum

Kod: Tümünü seç

  if (key=vk_delete) then
  begin
      buttonSelected := MessageDlg('Are you sure that you want to erase this record?',mtConfirmation, mbOKCancel, 0);
      if buttonSelected = mrOK then dm.q_pieselines.delete;
  end;

Fakat asagidaki sekilde bir hata mesaji aliyorum.

Update failed. Found 0 records.

Sanirim hata mesaji henuz commit edilmemis kaydin silinmeye calisilmasindan kaynaklaniyor. Bunu nasil cozebilecegime dair yardimci olursaniz memnun olurum

[CiTiZEN]

Merhabalar,
commit edilmemişse veritabanına da yazılmamıştır (yani diske yazılmamıştır), hatayı bu yüzden alıyor olabilirsin, rollbackretainig denermisin bir de.