![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите, кто знает, как не допустить автодобавление записи ч-з [D7, WinXP]
gs © (2004-01-07 03:02:00)
Подскажите, кто знает, как не допустить автодобавление записи ч-з DBGrid, но что бы можно было редактировать содержимое.
Vemer (2004-01-07 16:21:00) [1]
Проще написать Abort в событии BeforeInsert соответствующего датасета.
Evgeny V (2004-01-07 06:46:00) [2]
Не очень красиво, но можно так - для датасет с которым связана таблица например в обработчике OnNewRecord поставить Abort;
Если всеж надо иметь возможность вставлять записи например по нажатию кнопки юзером например TButton, то завести еще логическую переменную enableinsert:bool;
Тогда для TForm1.Button1Click(Sender:TObject)
begin
enableinsert:=true;
Table1.Insert;
end;
TForm1.Table1NewRecord(DataSet:TDataSet)
begin
if enableinsert=false then
Abort;
else
enableinsert:=false;
end;
Ну если используешь TDBNavigator, то соответственно код для клика Button1 в обработчик клика TDBNavigator с анализом что было нажато и без Table1.Insert;