Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как запретить удалить запись с опред ID (Значением поля)?


Layner ©   (2004-03-17 16:30:00) 

Т.е. "перегнать" событие q1BeforeDelete, и до него сделать отмену удаления?
Этот код срабатывает, но уже позже удаления...


procedure Tfover.q1BeforeDelete(DataSet: TDataSet);
begin
 if ds1.DataSet.FieldValues['rowid']=8 then
 begin
  showmessage('!!!!! NO  !!!!!');
  exit;
 end;
end;


Ламер2   (2004-03-17 16:40:00) [1]

там надо не Exit ставит, а Abort


Наверх

Титульная страница Поиск, карта сайта Написать письмо