全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:3231
推到 Plurk!
推到 Facebook!

請問如何將 bmp 的圖檔另存成 jpg 的圖檔??

答題得分者是:RaynorPao
csie
一般會員


發表:8
回覆:5
積分:2
註冊:2002-09-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-11-25 05:18:16 IP:61.217.xxx.xxx 未訂閱
用過許多站的 example 但都無法 complie 或是少了的檔案.. 不知道有人可以提供參考的程式嗎?? ps. TJPEGImage 是不是可以用,要如何用?? (我每次 Complie 都產生 [C Error] Unit1.cpp(21): E2451 Undefined symbol 'TJPEGImage') 是要 include 哪個檔還是如何呢?? 發表人 - csie 於 2002/11/25 10:37:37
FrederickPau
資深會員


發表:4
回覆:161
積分:268
註冊:2002-11-04

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-11-25 05:52:59 IP:61.16.xxx.xxx 未訂閱
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-11-25 08:42:26 IP:192.168.xxx.xxx 未訂閱
引言: 用過許多站的 example 但都無法 complie 或是少了的檔案.. 不知道有人可以提供參考的程式嗎?? ps. TJPEGImage 是不是可以用,要如何用??
要uses jpeg; ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2002-11-25 08:45:00 IP:203.73.xxx.xxx 未訂閱
引言: ps. TJPEGImage 是不是可以用,要如何用??
csie你好: 以下是 bcb 的寫法~~給你參考 < class="code"> (1)把 bmp 轉成 jpg

#include "jpeg.hpp"

void __fastcall TForm1::Button1Click(TObject *Sender) { Graphics::TBitmap *bmpBuf=new Graphics::TBitmap; TJPEGImage *jpgBuf=new TJPEGImage; bmpBuf->LoadFromFile("temp.bmp"); jpgBuf->Assign(bmpBuf); jpgBuf->SaveToFile("temp.jpg"); delete jpgBuf; delete bmpBuf; } (2)轉成 256 色 bmp 文魁書版社有出一本書 書名: C Builder & Windows API 範例辭典 書號: P2067 書裡面第二章的範例 就剛好是你所問的問題(裡面有完整的程式碼說明) -- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2002/11/25 10:48:10 發表人 - RaynorPao 於 2002/11/25 10:56:44
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
starhua
一般會員


發表:10
回覆:18
積分:5
註冊:2003-08-26

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-08-28 23:03:03 IP:210.203.xxx.xxx 未訂閱
請問一下若我把程式改成下面的形式,為何會發生錯誤呢    
 
   bmpBuf->LoadFromFile(OpenPictureDialog1->FileName);
   jpgBuf->Assign(bmpBuf);
   jpgBuf->SaveToFile(SavePictureDialog1->FileName); 
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-08-28 23:06:21 IP:140.135.xxx.xxx 未訂閱
starhua您好:   發生什麼錯誤呢??    順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~
starhua
一般會員


發表:10
回覆:18
積分:5
註冊:2003-08-26

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-08-28 23:54:01 IP:210.203.xxx.xxx 未訂閱
我也像範例中寫在一個button裡,也compile沒問題了 可是只要我一點這個button,整個程式就會跳出來並且要我Debug 是要在這個button加入什麼指令嗎
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   Graphics::TBitmap *bmpBuf=new Graphics::TBitmap;
   TJPEGImage *jpgBuf=new TJPEGImage;       bmpBuf->LoadFromFile(OpenPictureDialog1->FileName);
   jpgBuf->Assign(bmpBuf);
   jpgBuf->SaveToFile(SavePictureDialog1->FileName);        delete jpgBuf;
   delete bmpBuf;
}    
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-08-29 00:13:55 IP:140.135.xxx.xxx 未訂閱
starhua您好:   試試下面的方式
 
 Graphics::TBitmap *bmpBuf=new Graphics::TBitmap;
 TJPEGImage *jpgBuf=new TJPEGImage;
 if (OpenPictureDialog1->Execute())
 {
  bmpBuf->LoadFromFile(OpenPictureDialog1->FileName);
 }
 if (SavePictureDialog1->Execute())
 {
  jpgBuf->Assign(bmpBuf);
  jpgBuf->SaveToFile(SavePictureDialog1->FileName);
 }
  delete jpgBuf;
  delete bmpBuf;
順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~ 發表人 -
starhua
一般會員


發表:10
回覆:18
積分:5
註冊:2003-08-26

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-08-29 00:37:38 IP:210.203.xxx.xxx 未訂閱
謝謝版主的指導~^^~
系統時間:2024-05-07 4:03:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!