Обязательные поля

[MSD]

Здравствуйте. Подскажите пожалуйста. Есть БД BDE, на форме table, datasourse, query, dbnavigator, dbgrid, dbcombobox и 10 - dbedit'ov. Хочу сделать поля некоторые поля обязательными для заполнения, к примеру пишу в событии TableBeforPost:
if dbedit9.text=' ' then showmessage('error');
dbgrid1.datasourse.dataset.cansel; или abort без разницы, но те поля которы я уже ввел все равно остаются в новой таблице....(( Подскажите как сделать чтобы исправить (нужны обязательные поля!), спасибо, огромное.

[MadReason]

кинь код посмотреть

if dbedit9.text=' ' then 
begin
showmessage('error');
dbgrid1.datasourse.dataset.cansel;
end;

begin-end не забыл?

правильнее будет проверять чтоб в обязательных полях были данные, а потом добавлять в базу, а не отменять транзакции.

и почему бы не сделать обязательными поля (not null) на уровне БД? а потом уже через try-except извращаться?

[MSD]

Сообщение от MadReason

кинь код посмотреть

if dbedit9.text=' ' then 
begin
showmessage('error');
dbgrid1.datasourse.dataset.cansel;
end;

begin-end не забыл?

правильнее будет проверять чтоб в обязательных полях были данные, а потом добавлять в базу, а не отменять транзакции.

и почему бы не сделать обязательными поля (not null) на уровне БД? а потом уже через try-except извращаться?

спасибо сделал на уровне БД, как перехватить сообщение об ошибке когда поле не заполнено и вставить своё сообщение?

[artemavd]

try
 ....//ваши действия
except
 ....//обработка ошибки
end;

[MSD]

Сообщение от artemavd

try
 ....//ваши действия
except
 ....//обработка ошибки
end;

Сделал так:

begin
if dbedit1.text<>'' then
  try
  table1.post;
  except
  showmessage('Ошибка')
  end;

но при выполнении условия вылетает с начало моё сообщение "Ошибка" а потом сообщение базы данных об ошибке не заполненного поля.. Что не так делаю? Программу запускал и без дельфи...

[artemavd]

А если так?

begin
  try
  if dbedit1.text<>'' then
  table1.post;
  except
  showmessage('Ошибка')
  end;

[MSD]

Сообщение от artemavd

А если так?

begin
  try
  if dbedit1.text<>'' then
  table1.post;
  except
  showmessage('Ошибка')
  end;

та же фигня, только теперь сообщение "Ошибка" вообще не выскакивает а только ошибка базы данных... типа поле пустое все дела..) ((((

[artemavd]

а только ошибка базы данных... типа поле пустое все дела.

Скрин ошибки можно увидеть?

[MSD]

Сообщение от artemavd

Скрин ошибки можно увидеть?

да конечно..)

http://i064.radikal.ru/1006/5e/08601e01f0e7.jpg

[Stilet]

Ужосс... А не проще ли сделать тип поля NOT NULL в самой СУБД?