Проблема

Помогите, люди добрые! Не пойму, что происходит. Проблема вот в чем: Имеется таблица Paradox с одним полем (Binary), в котором хранится формула. В программе создаю OLE-объект Equation, в котором будет происходить редактирование формулы. Читаю из таблицы следующим образом:

procedure TfmMain.SourceDataChange(Sender: TObject; Field: TField);
var
Stream: TStream;
begin
with Table do Stream := CreateBlobStream(Fields[0], bmRead);
OLEEquation.LoadFromStream(Stream);
Stream.Free;
end;

Записываю в таблицу так:

procedure TfmMain.OLEEquationDeactivate(Sender: TObject);
var
Stream: TStream;
begin
with Table do Stream := CreateBlobStream(Fields[0], bmWrite);
OLEEquation.SaveToStream(Stream);
Stream.Free;
Table.Post;
end;

Записывается все идеально, а при чтении получаю ошибку: Project raised exception class EDBEngineError with message 'BLOB has been modified.'.

Почему так происходит?