mysql long raw_关于对数据库中的long raw类型的数据改革思路

通过一个例子给大家介绍一下在Oracle中使用大对象的方法。在这个例子中，目的是要把一个jpeg图像装入Oracle，并且用C++Builder显示出来。如果使用bmp图像，则处理的过程更简单一些，这里就不再鳌述了。

例子：

1. 创建一个表picture

create table picture

(

picture_name varchar2(30),

picture_blob blob,

picture_locator bfile

);

2. 创建一个目录，需要有DBA权限，用于指向在操作系统中的某个目录

create directory picture_dir as 'd:\blob_test';

假设在d:\blob_test目录下存放有pic.jpg、pic.bmp、pic.doc等文件

3. 插入一条记录，注意blob对象需要初始化为空对象，对于Blob类型的大对象必须用Empty_blob()函数。

insert into picture (picture_name,picture_blob,picture_locator )

values(

'pic1',empty_blob(),bfilename('PICTURE_DIR','PIC.JPG'));

4. 将picture_locator所指向的图形文件导入数据库的picture表中：

declare

l_pic_locator bfile;

l_pic_blob blob;

l_dir varchar2(200);

l_filename varchar2(200);

BEGIN

select picture_locator,picture_blob into l_pic_locator,l_pic_blob from picture where name='pic1';

-- 1。判断文件是否存在

IF DBMS_LOB.FILEEXISTS(l_pic_locator)=1 then

dbms_output.put_line('!!! The file exists!');

-- 2. 判断文件是否已被打开

if dbms_lob.fileisopen(l_pic_locator)=0 THEN

DBMS_OUTPUT.PUT_LINE(' THE FILE IS NOT OPEN, TO OPEN THE FILE...');

-- 3. 打开文件

DBMS_LOB.FILEOPEN(l_pic_locator);

DBMS_OUTPUT.PUT_LINE('!!! THE FILE IS OPENED!');

-- 4. 可以获得关于文件的一些信息，比如文件名，大小等

dbms_output.put_line('The Length of the file is:'||to_char(dbms_lob.getlength(l_pic_locator)));

dbms_lob.filegetname(l_pic_locator,l_dir,l_filename);

DBMS_OUTPUT.PUT_LINE('The opened file name is :'||l_dir||'\'||l_filename);

-- 5. 将外部jpeg文件装入Blob字段

DBMS_LOB.LOADFROMFILE(l_pic_blob,l_pic_locator,dbms_lob.getlength(l_pic_locator),1,1);

dbms_output.put_line('The file is loaded into database!');

END IF;

DBMS_OUTPUT.PUT_LINE('To close the file');

--6. 每一个fileopen必须有一个fileclose与之对应，所以关闭文件

IF DBMS_LOB.FILEISOPEN(l_pic_locator)=1 THEN

DBMS_LOB.FILECLOSE(l_pic_locator);

DBMS_OUTPUT.PUT_LINE('The file is closed!');

END IF;

END IF;

-- 7. 还必须在exception中保证文件关闭文件

exception

when others then

IF DBMS_LOB.FILEISOPEN(L_PIC)=1 THEN

DBMS_LOB.FILECLOSE(L_PIC);

DBMS_OUTPUT.PUT_LINE('An exception happens,the file is closed!');

else

dbms_output.put_line('An exception happens!') ;

end if;

END;

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

----------------------在C++Builder中使用从数据库中取得刚才创建的数据库中的图像------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

ADOQuery1->Close();

ADOQuery1->SQL->Clear();

ADOQuery1->SQL->Add(Memo1->Lines->Text);

ADOQuery1->Open();

if (ADOQuery1->FieldByName("name")->AsString=="pic1")

DBImage1->DataField="PICTURE_BLOB";

else

{

//1.创建用于存放Blob大对象的临时字段，并初始化为从数据库中取得的图形

TBlobField *pField = (TBlobField *)ADOQuery1->FieldByName("picture_blob");

//2.创建一个BlobStream流，以流的形式读取图形数据

TADOBlobStream *pmem = new TADOBlobStream(pField,bmRead);

//3. 将流指针放在流的头部

pmem->Seek(0,soFromBeginning);

//4. 新建一个JPEG对象

TJPEGImage * jp = new TJPEGImage();

//5. 将放在BlobStream流中的图形信息读入jpeg对象

jp->LoadFromStream(pmem);

//6. 将jpeg图像放在Image控件的picture组件的Graphic内，显示出来

Image1->Picture->Graphic=jp;

//7. 释放BlobStream流

delete pmem;

}

}

posted on

2005-12-29 11:21

lsp_jlu

阅读(464)

评论(0)

编辑

收藏