procedure TForm1.Table1BeforeClose(DataSet: TDataSet);
begin
if (Table1.State = dsEdit)or(Table1.State = dsInsert) then Table1.Post;
end;
Новые значения в базе данных не сохраняются
Во время работы программы с базой данных (через BDE), не сохраняются данные, внесенные в базу, если эту программу "завершить" путем снятия процесса.
При этом:
1. В свойстве компонента Table1 UpdateMode - указано upWhereChanged
2. При срабатывании события AfterPost - выполняется процедура закрытия,а затем открытия набора данных.
Почему так происходит?
Что можно сделать, чтобы так не происходило?
Заранее спасибо.
Код:
вот юзай (у меня пашет)...