Показать сообщение отдельно
  #1  
Старый 22.11.2008, 20:25
apanko apanko вне форума
Администратор
 
Регистрация: 15.08.2006
Сообщения: 1,629
Копирование Stream

Чего-то захотелось скопировать BLOB, точнее из одной карточки товара перенести рисунок в другую.
Можно было бы и через файл, но это не по феншую.

Сделал так:

Код:
rItemFrom.GET('70102'); rItemFrom.CALCFIELDS(Picture); rItemFrom.Picture.CREATEINSTREAM(iStream); rItemTo.GET('1200'); rItemTo.Picture.CREATEOUTSTREAM(oStream); WHILE NOT iStream.EOS DO BEGIN iStream.READ(txt100); oStream.WRITE(txt100); END; rItemTo.MODIFY;

Последний раз редактировалось apanko, 24.11.2008 в 11:18.
Ответить с цитированием