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

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

Подскажите, кто знает, как не допустить автодобавление записи ч-з [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;


Наверх

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