Меню сайта
Мини-чат
Чтобы добавить сообщение, необходимо авторизоваться.
Категории
Алгоритмы [95]
API [111]
Pascal [153]
Базы Данных [173]
BDE [0]
Интернет [0]
Мультимедия [0]
Аппаратное обеспечение [0]
Операционная система [0]
Компоненты [0]
Классы [0]
OLE+ [0]
Миграция [0]
Ошибки [0]
DLL [0]
Продукты третьих фирм [0]
Разное [0]
События [0]
Главная » Статьи » Не стандартные примеры на Delphi » Базы Данных
Как записать в BLOB-поле большой текст (>255 байт) из Delphi?
Nomadic отвечает:

Можно так -

    var
S: TBlobStream;
B: pointer;
c: integer;
...
Table1.Edit;
S := TBlobStream.Create( Table1BlobField as TBlobField, bmWrite ); {кажется, так}
C := S.Write(B, C);
Table1.Post;
S.Destroy;

или так -

    var
S: TMemoryStream;
B: pointer;
C: integer;
...
S := TMemoryStream.Create;
...
Table1.Edit;
S.Clear;
S.SetSize(C);
C := S.Write(B,C);
( Table1BlobField as TBlobField ).LoadFromStream( S );
S.Clear;
Table1.Post;
...
S.Destroy; 
Категория: Базы Данных | Добавил: DelphiAiX (20.05.2012)
Просмотров: 576 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
  тИЦ и PR сайта www.aix.ucoz.ru Protected by Copyscape Web Copyright Protection Software Счетчик цитирования
Все материалы размещенные на сайте пренадлежат их владельцам и предоставляются исключительно в ознакомительных целях.
Администрация ответственности за содержание материала не несет и убытки не возмещает.
По истечению 24 часов материал должен быть удален с вашего компьютера.
Незаконная реализация карается законами РФ и Украины : "Об авторском и смежном праве".
При копировании материала, ссылка на сайт обязательна! Сделать бесплатный сайт с uCoz | Карта сайта | Карта форума