Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Внизпроблема с удалением записей Найти похожие ветки
← →
Hermit (2001-12-06 15:58) [3]События
AfterDelete и AfterPost = UpdateTable
а в этой процедуре следующее:
procedure Tdm.UpdateTable(DataSet: TDataSet);
begin
with DataSet as TDBDataSet do
begin
Database.StartTransaction;
try
ApplyUpdates; {try to write the updates to the database};
Database.Commit; {on success, commit the changes};
except
Database.Rollback; {on failure, undo the changes};
CancelUpdates;
raise; {raise the exception to prevent a call to CommitUpdates!}
end;
CommitUpdates; {on success, clear the cache}
end;
end;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.019 c