Запись CLOB данных через ODAC

[3D Hunter]

Можно простой пример записи в CLOB-поле строки или числа? Перерыл инет, одна вода... Но также буду рад тыкнуться носом в ссылки, которые вы кините сюда

Вообще делаю так:

  LOraSQL:=TOraSQL.Create(nil);
  LOraSQL.Session:=TOraSession.Create(LOraSQL);
...//тут соединение с базой, все успешно
  LOraSQL.SQL.Text:='insert into test (info,binary) values (:i,:b)';
  LOraSQL.ParamByName('i').AsString:='3ds max';
  LOraSQL.ParamByName('b').ParamType:=ptInput;
  LOraSQL.ParamByName('b').AsOraClob.AsString:='is binary string format data exception';
  LOraSQL.Execute;
  LOraSQL.Session.Free;
  LOraSQL.Free;

[Vapaamies]

И правильно, что ничего нет. Момент сохранения CLOB прекрасно описан в справке, плюс имеется демка в Demo, идущая вместе с компонентами. Ищите да обрящете.

  quInsertRecord.ParamByName('Value').DataType := ftOraClob;

[3D Hunter]

Добавил, все пишется. Но почему-то иногда возбуждается DB Internal Error, и все же запись происходит. Прочел, что после Execute вроде нужно вызывать метод WriteLob. Можете пояснить его смысл?

[Vapaamies]

Сообщение от 3D Hunter

Прочел, что после Execute вроде нужно вызывать метод WriteLob.

В общем случае сохранение LOB означает сохранение его локатора, а сам поток данных LOB должен передаваться отдельно. В некоторых случаях компоненты могут маскировать эту ситуацию каким-то умолчательным поведением, но, видимо, у них получается не всегда. Стало быть, справка не врет про WriteLob.

[3D Hunter]

Более-менее разобрался... спасибо!