Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.05;
Скачать: CL | DM;

Вниз

Удаление записей из подчиненной таблицы   Найти похожие ветки 

 
diabolik_krsk   (2004-11-09 09:42) [0]

Помогите решить проблему.

На форме существует два компонента ADOQuery (ADOQ) и ADOTable (ADOT), связывание с DBGrid идет через DataSourse.
ADOT является подчиненой таблицей по отношению к ADOQ.
Пытаюсь удалиить запись в ADOQ и ADOT таким образом


ADOT.First;
with adot do while not Eof do
begin
 if ADOT.FieldByName("tip").AsString = ADOQ.FieldByName("tip").AsString
 then
   begin
     ADOT.Delete;
     ADOT.next
   end
 else ADOT.Next;
ADOQ.Delete;
end;


Естественно в подчиненной таблице несколько записей относящихся к одной записи в ADOQ. Однако в ADOT программа удаляет только одну запись, а остальные оставляет.
В таблице привязанной через ADOQ все удаляется нормально.

В результате в подчиненной таблице остаются записи никуда не относящиеся (мусор).

Подскажите как сделать чтобы в подчиненной таблице все записи удалялись, а не одна???


 
Mike Kouzmine ©   (2004-11-09 09:46) [1]

А ты некст убери то.


 
Manfred8   (2004-11-09 10:49) [2]

вообще-то есть такие штуки как связи и каскадное удаление


 
diabolik_krsk   (2004-11-09 11:07) [3]


> Mike Kouzmine ©   (09.11.04 09:46) [1]

Где его убрать??? Да и если его убрать, не зависнет ли цикл удаления??


> Manfred8   (09.11.04 10:49) [2]
> вообще-то есть такие штуки как связи и каскадное удаление


А что это такое и где можно почитать??


 
Mike Kouzmine ©   (2004-11-09 11:55) [4]

Тот что после делете



Страницы: 1 вся ветка

Текущий архив: 2004.12.05;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.033 c
6-1096453737
Yerick
2004-09-29 14:28
2004.12.05
Всё тот же ЛВС


9-1091466928
Xerx
2004-08-02 21:15
2004.12.05
как покрыть плиткой круг


6-1096607506
Девушка
2004-10-01 09:11
2004.12.05
Програмный пинг


14-1100512027
Dmitriy O.
2004-11-15 12:47
2004.12.05
Россия отдаст острова Японии !


1-1101061585
tormoz
2004-11-21 21:26
2004.12.05
Microsoft Word





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский