Текущий архив: 2003.05.15;
Скачать: CL | DM;

Вниз

Как загнать картинку в BLOB используя IBX?   Найти похожие ветки 

← →
pathfinder ©   (2003-04-23 16:50) [0]

Уважаемые мастера, подскажите как вставить картинку в BLOB используя IBX компоненты (кроме IBTable).
заранее спасибо.

---

← →
Johnmen ©   (2003-04-23 16:57) [1]

Это не ты вчера спрашивал про FIBPlus ?
Вот кусок из примера. (Для IBX сам разберешься...)

Пpиводим пpимepы pаботы с blob-полями. pFIBDatase1BLOBFIELD - полe типа BLOB датасeта pFIBDatabase1
Чтение из блоб-поля в OleContainer

var S: TStream;
begin
if not pFIBDataset1BLOBFIELD.IsNull then
begin
S:=pFIBDataset1.CreateBlobStream(pFIBDataset1BLOBFIELD, bmRead);
try
OleContainer1.LoadFromStream(S)
finally
S.Free
end;
end;
end;

Запись в блоб-полe из OleContainer (вызываeтся в BeforePost)

var S: TStream;
begin
S:=pFIBDataSet1.CreateBlobStream(pFIBDataSet1BLOBFIELD,
bmReadWrite);
try
OleContainer1.SaveToStream(S)
finally
S.Free
end;
end;

---

Страницы: 1 вся ветка

Текущий архив: 2003.05.15;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.021 c