Mega Code Archive

 

Categories / Delphi / ADO Database

 

Detayi olan bir tablodan kayit silme

Master-Detay iliski icerisindeki tablolarda, detayi olan bir ana kayit silindiginde, detaylar ortada kalir. Ana kayit olmadigina göre detaylara da ihtiyac yoktur. Bu nedenle ana kayit silinmeden önce detaylari silmek gerekir. Table1 ana tabloya, Table2 de Detay tabloya bagli kabul edilirse, Table1' den bir kayit silinmek istendiginde önce Table2' deki detaylar temizlenecektir asagidaki örnek bunu göstermektedir. procedure TForm1.Table1BeforeDelete(DataSet: TDataset) begin with Table2 do begin DisableControls; First; While not EOF do Delete; EnableControls; end; end;