🚀 go-pugleaf

DisableControls w KASUJ_Z_DETAILn, powoduje ze nie sa wyzwalane zdarzenia
dal tej tablicy w tym wypadku Detail2.

--
Zbyszek Zarzycki
BSC Polska
Spotkanie uzytkowników produktów INPRISE/BORLAND
Warszawa, 11-12 maj 1999
wiecej informacji http://www.inprise.com.pl/events/icon99.htm

    Radko napisał(a) w wiadomości:
<372010DE.10AD72B1@uoo.univ.szczecin.pl>...

    Mam trzy tabele, w relacjach jak poniżej:
    MASTER
     |_DETAIL1 (Master dla DETAIL2)
       |_DETAIL2

    W momencie usuwania rekordu z tabeli MASTER,. chcę aby zostały usunięte
wszystkie odpowiadające mu rekordy z tabeli DETAIL1. I odpowiednio w
momencie usuwania rekordu z tabeli DETAIL1, wszystkie odpowiadające mu
rekordy z DETAIL2. W tym celu wykorzystuję zdarzenie OnBeforeDelete.
Wszystkie trzy tabele mają wspólną obsługę tego zdarzenia, jak poniżej:

    Procedury KASUJ_Z_DETAILn mają identtyczną postać (zmienia się jedynie
tabela).

    Procedure KASUJ_Z_DETAILn;
    Begin
     With DETAILn do
       try
        DisableControls;
        First;
        While Not Eof do
          Delete;
       Finally
        EnableControls;
      End;
     End;

    Uzyskuję ciekawy efekt. W momencie, kiedy kasuję pojedyncze rekordy z
tabeli DETAIL1, wszystko jest OK. Kasowany jest rekord z DETAIL1 i wszystkie
z DETAIL2, które mu odpowiadają. Jednak, kiedy kasuję rekord MASTER,
kasowane są poprawnie wszystkie z DETAIL1. Rekordy z DETAIL2 kasowane są
jednak poprawnie jedynie dla pierwszego usuwanego rekordu z DETAIL1, dla
reszty pozostają w bazie. Czy ktoś może zetknął się z takim problemem i wie
z czego on wynika ?