Ошибка чтени/записи BLOB поля [D7, Paradox]
Lukin © (2004-06-23 10:20:00)
Есть код:
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:00) [1]
Лукин Виктор, ТЫ ПЛОХОЙ ЧЕЛОВЕК !
Наверх 
ЧАТ |
Орешник |
|
