Цитата:
из файла справки:
Try...except statements
Exceptions are handled within try...except statements. For example,
try
X := Y/Z;
except
on EZeroDivide do HandleZeroDivide;
end;
This statement attempts to divide Y by Z, but calls a routine named HandleZeroDivide if an EZeroDivide exception is raised.
The syntax of a try...except statement is
try statements except exceptionBlock end
|
Если честно я французский и немецкий учил
. И я в базах полный чайник
Цитата:
anonymous Дублирующаяся запись в базе - ошибка?
|
Почти, но не то. Я наверно не правильно объяснил в чем проблема(((
Есть таблица:
Код:
create table man(id integer not null constraint Name_1 primary key,
FIO varchar(30) not null,
holiday data not null,
phone numeric(11,0) not null,
pol varchar(1) not null constraint Name_2 check((pol = 'М') or (pol = 'Ж')),
constraint Name_3 unique(FIO,holiday));
как можно в клиентском приложении, в блоке
распознать срабатывающие ограничения Name_1, Name_2 и Name_3 между собой на не допустимые значения?
Потому что в EDatabaseError срабатывает для всех ограничений одинаково:
Код:
on E:EDatabaseError do
MessageDlg('Ошибка добавления!'+#13+E.Message,mtError,[mbOK],0);
А мне бы хотелось для каждого ограничения выдавать свое сообщение на русском языке.
Это вообще возможно?