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

Вниз

Как в Oracle записать/прочитать BLOB-поле?   Найти похожие ветки 

← →
cher_gvf ©   (2002-12-03 14:35) [0]

Помогите примером,плиз.

---

← →
Prooksius ©   (2002-12-03 14:40) [1]

В компонентах Direct Oracle Access - \Demos\PictureDemo\

---

← →
Наталия ©   (2002-12-04 06:20) [2]

Тип поля LONG RAW
Можно так через потоки:
Чтение:

bit:=Tbitmap.Create;
MS := TMemoryStream.Create;

TBlobField(OCIQuery1.FieldByName("icona")).SaveToStream(MS);
MS.Seek(soFromBeginning, 0);
if ms.Size>0 then
begin
bit.LoadFromStream(ms);
end;
bit.free;

Запись:
ms := TMemoryStream.Create;
bitmap.SaveToStream(ms);
with OCIQuery1 do begin
active:=false;
sql.clear;
sql.add("update vid set icona=:par where id=:par1");
parambyname("par1").asinteger:=nom;
ParamByName("par").DataType := ftBlob;
ParamByName("par").ParamType := ptInput;
ParamByName("par").LoadFromStream(ms,ftBLOB);
execsql;
end;
Если работаешь через BDE, то можно через BlobStream

---

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

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

Наверх

Память: 0.47 MB
Время: 0.019 c