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

如何開啟jpg的檔案

尚未結案
frankh
一般會員


發表:25
回覆:36
積分:12
註冊:2005-05-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-04 21:52:48 IP:219.68.xxx.xxx 未訂閱
不知道到如何開啟jpg的照片... 不知道哪位大大願意教導.....
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-04 22:30:30 IP:218.168.xxx.xxx 未訂閱
您好: 請多多利用[搜尋]功能 exhttp://delphi.ktop.com.tw/topic.php?topic_id=44868
KENI_LIN
中階會員


發表:86
回覆:267
積分:90
註冊:2004-05-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-05-05 13:15:23 IP:210.208.xxx.xxx 未訂閱
frankh兄 也可以在會員作品發表區裡,找到很多類似這些問題的討論區: http://delphi.ktop.com.tw/topic.php?TOPIC_ID=68151 寒窗苦讀十年書;只待今朝狀元時!~~ ︵ / / ︵ ( ∩ ∩ ) ○ ︶ ○ Keni Lin
------
Keni Lin
frankh
一般會員


發表:25
回覆:36
積分:12
註冊:2005-05-04

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-05-05 23:48:53 IP:219.68.xxx.xxx 未訂閱
我有去下載滑鼠捉取RGB的作品 但因為小弟我是新手... 所以不是很懂....  
if(OpenDialog1->Execute())
 {
 TJPEGImage *jpg=new TJPEGImage;
 jpg->LoadFromFile(OpenDialog1->FileName);
 Graphics::TBitmap *bmp=new Graphics::TBitmap;
 bmp->Assign(jpg);
 // ...Image process here...
 Image2->Picture->Assign(bmp);
 delete bmp;
 delete jpg;
 }
 Image2->Picture->LoadFromFile(OpenDialog1->FileName);
 Image2->Width=Image2->Picture->Width;
 Image2->Height=Image2->Picture->Height;
 Image2->Visible = true;
} 
這邊是TJPEGImage *jpg=new TJPEGImage;... 是把他壓成jpg的格式... 但我想要是從檔案夾直接開啟jpg到image1裡面.. 不知哪位大大願意教導.... 因為專案的需要... 我需要用非常短的時間去了解... 麻煩了^^
koopa
一般會員


發表:5
回覆:9
積分:2
註冊:2004-05-17

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-05-06 02:12:07 IP:140.118.xxx.xxx 未訂閱
引言: 我有去下載滑鼠捉取RGB的作品 但因為小弟我是新手... 所以不是很懂....
if(OpenDialog1->Execute())
 {
 TJPEGImage *jpg=new TJPEGImage;
 jpg->LoadFromFile(OpenDialog1->FileName);
 Graphics::TBitmap *bmp=new Graphics::TBitmap;
 bmp->Assign(jpg);
 // ...Image process here...
 Image2->Picture->Assign(bmp);
 delete bmp;
 delete jpg;
 }
 Image2->Picture->LoadFromFile(OpenDialog1->FileName);
 Image2->Width=Image2->Picture->Width;
 Image2->Height=Image2->Picture->Height;
 Image2->Visible = true;
} 
這邊是TJPEGImage *jpg=new TJPEGImage;... 是把他壓成jpg的格式... 但我想要是從檔案夾直接開啟jpg到image1裡面.. 不知哪位大大願意教導.... 因為專案的需要... 我需要用非常短的時間去了解... 麻煩了^^
我沒辦法寫一個完整的程式給你,我寫個大概。 TJPEGImage *jpg=new TJPEGImage; //宣告一個jpg物件 jpg->LoadFromFile(FileName); //讀檔案進來 Image1->Picture->Bitmap->Assign(jpg); //在Image1中show出圖片 希望這是你要的。
KENI_LIN
中階會員


發表:86
回覆:267
積分:90
註冊:2004-05-31

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-05-06 10:07:52 IP:220.228.xxx.xxx 未訂閱
引言: 我有去下載滑鼠捉取RGB的作品 但因為小弟我是新手... 所以不是很懂.... if(OpenDialog1->Execute()) { TJPEGImage *jpg=new TJPEGImage; jpg->LoadFromFile(OpenDialog1->FileName); Graphics::TBitmap *bmp=new Graphics::TBitmap; bmp->Assign(jpg); // ...Image process here... Image2->Picture->Assign(bmp); //將Image2改為Image1 delete bmp; delete jpg; } Image2->Picture->LoadFromFile(OpenDialog1->FileName); //將Image2改為Image1 Image2->Width=Image2->Picture->Width; //將Image2改為Image1 Image2->Height=Image2->Picture->Height; //將Image2改為Image1 Image2->Visible = true; //將Image2改為Image1 }
因為這個程式是分兩個畫面呈現;一個是Image1存BMP的圖檔,另一個Image2存JPG圖檔,分開的原因是因為只有Image1才能做RGB的讀值功能;所以如果你只是要做開啟JPG的功能而已的話,將以上程式段的Image2改為Image1,就可以"從檔案夾直接開啟jpg到image1裡面". 如果你的問題是要做直接讀取,而不要再透過開啟的動作的話,就用以下方式修改,將上述程式段裡的: jpg->LoadFromFile(OpenDialog1->FileName); 改為 jpg->LoadFromFile("c:\\1.jpg"); //直接讀取檔案路徑的1.jpg圖檔 我也是剛玩影像處理而已,如果有錯誤的話麻煩高手訂正 寒窗苦讀十年書;只待今朝狀元時!~~ ︵ / / ︵ ( ∩ ∩ ) ○ ︶ ○ Keni Lin
------
Keni Lin
frankh
一般會員


發表:25
回覆:36
積分:12
註冊:2005-05-04

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-05-06 15:39:00 IP:219.68.xxx.xxx 未訂閱
謝謝各位的教導... 但在我測試的時候... 會一直出現undefined symbol 'TJPEGImage' undefined symbol'jpg' 這一些錯誤的字眼... 使得我一直無法測試成功... 我是用:     
 void __fastcall TForm1::Image1Click(TObject *Sender)
{
     if(OpenDialog1->Execute())
{
TJPEGImage *jpg=new TJPEGImage;
jpg->LoadFromFile(OpenDialog1->FileName);
Graphics::TBitmap *bmp=new Graphics::TBitmap;
bmp->Assign(jpg);
// ...Image process here...
Image1->Picture->Assign(bmp); //將Image2改為Image1
delete bmp;
delete jpg;
}
Image1->Picture->LoadFromFile(OpenDialog1->FileName); //將Image2改為Image1
Image1->Width=Image2->Picture->Width; //將Image2改為Image1
Image1->Height=Image2->Picture->Height; //將Image2改為Image1
Image1->Visible = true; //將Image2改為Image1
}
smilebye
一般會員


發表:21
回覆:33
積分:10
註冊:2004-01-18

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-05-06 17:29:04 IP:163.13.xxx.xxx 未訂閱
引言: 謝謝各位的教導... 但在我測試的時候... 會一直出現undefined symbol 'TJPEGImage' undefined symbol'jpg' 這一些錯誤的字眼... 使得我一直無法測試成功... 我是用:
 void __fastcall TForm1::Image1Click(TObject *Sender)
{
     if(OpenDialog1->Execute())
{
TJPEGImage *jpg=new TJPEGImage;
jpg->LoadFromFile(OpenDialog1->FileName);
Graphics::TBitmap *bmp=new Graphics::TBitmap;
bmp->Assign(jpg);
// ...Image process here...
Image1->Picture->Assign(bmp); //將Image2改為Image1
delete bmp;
delete jpg;
}
Image1->Picture->LoadFromFile(OpenDialog1->FileName); //將Image2改為Image1
Image1->Width=Image2->Picture->Width; //將Image2改為Image1
Image1->Height=Image2->Picture->Height; //將Image2改為Image1
Image1->Visible = true; //將Image2改為Image1
}
您好: 記得加入標頭檔
 #include  
大家好: 關於程式設計~我有很多不懂之處,請大家多幫忙唷^^ ~謝謝~ 發表人 - smilebye 於 2005/05/06 17:31:24 發表人 - smilebye 於 2005/05/06 17:32:37 發表人 - smilebye 於 2005/05/06 17:34:06
------
我是新手,程式設計的菜鳥>< 嗚~請多幫忙唷!
frankh
一般會員


發表:25
回覆:36
積分:12
註冊:2005-05-04

發送簡訊給我
#9 引用回覆 回覆 發表時間:2005-05-06 19:22:02 IP:219.68.xxx.xxx 未訂閱
加完檔頭後..... run是成功ㄌ... 但是我自己建的介面跑出來是什麼都沒有... 這又是怎麼一回事??
KENI_LIN
中階會員


發表:86
回覆:267
積分:90
註冊:2004-05-31

發送簡訊給我
#10 引用回覆 回覆 發表時間:2005-05-09 13:50:43 IP:220.228.xxx.xxx 未訂閱
引言: 加完檔頭後..... run是成功ㄌ... 但是我自己建的介面跑出來是什麼都沒有... 這又是怎麼一回事??
以上這個問題"自己建的介面跑出來",我看不太懂, 但我想你應該解決問題了吧! 寒窗苦讀十年書;只待今朝狀元時!~~ ︵ / / ︵ ( ∩ ∩ ) ○ ︶ ○ Keni Lin
------
Keni Lin
frankh
一般會員


發表:25
回覆:36
積分:12
註冊:2005-05-04

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