Показать сообщение отдельно
  #6  
Старый 22.05.2011, 13:43
Аватар для TolAlik
TolAlik TolAlik вне форума
Прохожий
 
Регистрация: 02.10.2009
Сообщения: 41
Репутация: 10
По умолчанию

Цитата:
из файла справки:
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));
как можно в клиентском приложении, в блоке
Код:
try except 
распознать срабатывающие ограничения Name_1, Name_2 и Name_3 между собой на не допустимые значения?
Потому что в EDatabaseError срабатывает для всех ограничений одинаково:
Код:
on E:EDatabaseError do
   MessageDlg('Ошибка добавления!'+#13+E.Message,mtError,[mbOK],0);
А мне бы хотелось для каждого ограничения выдавать свое сообщение на русском языке.
Это вообще возможно?
Ответить с цитированием