Форум: "Базы";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];

Вниз

Как в 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c