Ошибка чтени/записи BLOB поля

← →
Lukin (2004-06-23 10:20) [0]

Есть код:

Table1 := TTable.Create(Nil);
Table1.DatabaseName := AliasDB
Table1.TableType := ttParadox;
Table1.TableName := "Table1";
Table1.IndexFieldNames := "ID";
Table1.Active := True;
.
.
.
S := Table1.FieldByName("FileldFormatMemo").AsString; (1)
.
.
.
if Table1.Eof then Table1.Append else Table1.Edit;
Table1.FieldByName("FileldFormatMemo").Value := S;
Table1.Post
.
.
.
Table1.Active := False;
Table1.Free;

Этот код работает несколько раз, а потом в строке (1)
возникает ошибка BDE "Блоб поле было изменено" и ничего в S не читается и не пишется. Лечится путем загрузка DB файла в Desktop вызовом Restructure table и сохранением результатов.
При этом ничего в структуре таблицы не меняется.

Если сомпонент Table1 создавать в IDE то все работает, но мне нужно имено создать сомпонент Table1 в runtime.

Может у кого есть соображения по данной ситуации.

С уважением к присутствующим, Лукин Виктор.

← →
Moss (2004-07-02 15:47) [1]

Лукин Виктор, ТЫ ПЛОХОЙ ЧЕЛОВЕК !

Ошибка чтени/записи BLOB поля Найти похожие ветки