BCB 6 sp4 + SQL Server 2k 存取JPEG圖像，絕對好用！

2024-08-31 00:47:54

字體：大中小

來源：轉載

供稿：網友

在bcb 6 sp4里調試通過，歡迎大蝦批評指正。

//opendialog1打開jpeg圖像，edit1保存圖像地址，image1顯示圖像//其他格式的圖像文件沒有試驗，可以試試。

    opendialog1->filename="";    if (opendialog1->execute())       {          edit1->text= opendialog1->filename;          image1->picture->loadfromfile(edit1->text);       }

// 下面：把圖像保存到sql server數據庫中

if (!edit1->text.isempty())       {           adoquery1->close();    //自行添加adoconnention，并配置          adoquery1->sql->clear();          adoquery1->sql->add("select * from imgs");          adoquery1->open();          adoquery1->insert();

          adoquery1->fieldbyname("imgaddress")->asstring=edit1->text;          adoquery1->fieldbyname("imgid")->asinteger=edit2->text.toint();         //保存圖像的編號          tblobfield *field=dynamic_cast<tblobfield *>(adoquery1->fieldbyname("img")); //img 是image類型的數據          field->loadfromfile(edit1->text); //這里是關鍵，要直接從文件調。不要調image1，這樣很容易出“jepg error #41”錯誤

          adoquery1->post();        adoquery1->close();       }

//從數據庫里讀取圖像

adoquery1->close();adoquery1->sql->clear();adoquery1->sql->add("select * from imgs ");ansistring ddd="where imgid=" +edit1->text;adoquery1->sql->add(ddd);adoquery1->open();if(adoquery1->recordcount==1){   tstream *stream1; tjpegimage   *pjp=new tjpegimage(); try {    stream1=adoquery1->createblobstream(adoquery1->fieldbyname("img"), bmread);    pjp->loadfromstream(stream1);    image2->picture->assign(pjp);    delete stream1; } __finally {        delete pjp; } }

ps：第一次發文章，不知道格式怎么樣。 ^_^

本文來源于網頁設計愛好者web開發社區http://www.html.org.cn收集整理，歡迎訪問。

上一篇：SQL Server 2000數據庫連接

下一篇：當SQL Server數據庫崩潰時如何恢復