В книге 'Delphi unleashed' на странице 520 автор написал:
'..., вы можете делать откат все время до тех пор, пока прямо или косвенно не
сделаете постинг данных.'
Моя проблема дважды возникала в случае ExTable.Edit в различных процедурах.
Код был примерно таким:
|
|
Procedure1 ....
begin
ExTable.Edit ;
ExTable.FieldByName('...').AsString := ...;
...
end;
procedure2 .....
begin
ExTable.Edit;
.....
end; |
Процедура CancelSpdBtnClick была вызвана после этих двух процедур.
Действительно, прежде, чем делать откат, постинг был косвенно вызван между двумя
вызовами ExTable.Edit. Теперь после такой модификации все работает как часы. |