Здравствуйте.
Из одной таблицы удаление:
Код:
if
(Table1.RecordCount>0) then
begin
u:=MessageDlg('Удалить проект?',mtCustom,[mbYes,mbNo],0);
if u=mrYes then
begin
Table1.Delete;
//Table2.Delete;
end;
Но в связанных с таблицей 1, таблицах записи не удаляются. Я понимаю , что есть каскадное удаление, но там при удалении ошибка появлялась.
И второй вопрос.
Что надо добавить в строке u:=MessageDlg('Удалить проект?',mtCustom,[mbYes,mbNo],0);
чтобы в диалоговом окне удалить проект стояло ,то что введено в таблицу 1, т.е в combobox?