Приёмы работы с BLOB (OLE/Memo) полями

Previous  Top  Next

    
 

 

 

Загрузка файла из TImage:

 

 

Code:

     QAll.Edit;

     QAll.FieldByName('Logo').assign(Image.Picture);

     QAll.post;

 

 

 

Чтение файла из таблицы в TImage:

Code:

Image.Picture.assign(QAll.FieldByName('Logo'));

 

 

 

 

Загрузка данных в поле:

Code:

(Table1.DataSource2.Fields.Field[01] As TBlobField).LoadFromStream 

 

 

 

 

Загрузка данных через параметры:

 

Запрос

Code:

Insert into MyTable (MyBlobField)

Values (:Something)

 

 

 

В коде:

 

Code:

(Query1.parameters.parambyname('Something') as TBlobField).LoadFromFile ...

(Query1.parameters.parambyname('Something') as TBlobField).LoadFromStream ...

(Query1.parameters.parambyname('Something') as TBlobField).assign ...

 

 

 

 

 

 

©Drkb::02481

Автор: Vit (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)

Взято из http://forum.sources.ru