|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
DBGridEH и запрет редактирования
Необходимо, чтобы пользователь мог добавить,удалить, редактировать добавленную запись, но не мог редактировать запись, после которой записи уже добавлялись. Сам ничего придумать пока не смог =(
Последний раз редактировалось diagnoz, 05.10.2010 в 08:30. |
#2
|
||||
|
||||
Код:
type TForm1 = class(TForm) CanEdit: Boolean; procedure TForm1.FormCreate(Sender: TObject); begin CanEdit:=True; end; procedure TForm1.Table1AfterDelete(DataSet: TDataSet); begin CanEdit:=False; end; procedure TForm1.Table1BeforeEdit(DataSet: TDataSet); begin if not CanEdit then raise Exception.Create('Oops'); end; Пишу программы за еду. __________________ |
#3
|
|||
|
|||
Спасибо. Не знал от трригерах
|