關於影像資料庫 |
尚未結案
|
bee0606
一般會員 發表:22 回覆:30 積分:10 註冊:2003-08-12 發送簡訊給我 |
|
richtop
資深會員 發表:122 回覆:646 積分:468 註冊:2003-06-10 發送簡訊給我 |
bee0606您好: 以下是針對您所提問題的一個參考解法: (一) 將Graphic欄位的內容讀入Image中
Image1->Picture->Assign(Table1->FieldByName("Photo")); (二) 任意讀入bmp或jpg檔,並將其存入Graphic欄位中
void __fastcall TForm1::btn2DBImageClick(TObject *Sender) { OpenDialog1->Filter = "*.jpg;*.jpeg;*.bmp|*.jpg;*.jpeg;*.bmp"; if ( OpenDialog1->Execute() ) { Graphics::TBitmap *bmp= new Graphics::TBitmap; try { Image1->Picture->LoadFromFile(OpenDialog1->FileName); bmp->Height=Image1->Picture->Height; bmp->Width =Image1->Picture->Width; bmp->Canvas->Draw(0, 0, Image1->Picture->Graphic); // Graphic for JPEG format. Image1->Height=bmp->Height; Image1->Width =bmp->Width; Image1->Picture->Assign((Graphics::TBitmap*)bmp); // transfering to JPEG format Table1->Edit(); Table1->FieldByName("Photo")->Assign(Image1->Picture); Table1->Post(); } __finally { delete bmp; } } }P.S. 1. Photo是我假設的Graphic欄位。 2. Graphic欄位似乎只能存入bmp格式的圖形資料(我不完全確定)。 3. 將DBImage連向Graphic欄位即可顯示該資料的圖形。 Enjoy it !! |
bee0606
一般會員 發表:22 回覆:30 積分:10 註冊:2003-08-12 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |