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

轉成灰階影像有問題

尚未結案
spark184
一般會員


發表:6
回覆:2
積分:1
註冊:2004-02-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-05 13:19:29 IP:140.118.xxx.xxx 未訂閱
我是剛進入影像處理的菜鳥~ 剛寫一個程式 就是將RGB 24bit的影像轉成灰階影像~ 還有就是將影像反白.. 可是就是有問題.. 執行的結果就只有圖的四分之一有反應.. 而且也不是灰階... 但是就是找不出原因 想請個位高手指點我.. 謝謝..   [code] void __fastcall TForm1::Button1Click(TObject *Sender) { Byte *ptr; int ImageHeight,ImageWidth;    Image1->Picture->Bitmap->PixelFormat=pf24bit; ImageHeight=Image1->Height; ImageWidth=Image1->Width ;    for(int row = 0; rowPicture->Bitmap->ScanLine[row]; for(int x=0; xPicture->Bitmap->PixelFormat=pf24bit; Image2->Picture->Bitmap->PixelFormat=pf8bit; Image2->Picture->Bitmap->Width=Image1->Picture->Bitmap->Width; Image2->Picture->Bitmap->Height=Image1->Picture->Bitmap->Height; for(i=0;iHeight;i ) { ptr1 = (BYTE *)Image1->Picture->Bitmap->ScanLine[i]; ptr2 = (BYTE *)Image2->Picture->Bitmap->ScanLine[i]; k=0; for(j=0;jWidth*3;j =3) { B=ptr1[j 0]; G=ptr1[j 1]; R=ptr1[j 2]; ptr2[k ]=R*0.299 G*0.587 B*0.114; } } } code]
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-05 13:54:01 IP:140.135.xxx.xxx 未訂閱
spark184您好: 不嫌棄的話,您可以參考小弟的拙作 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=40159 【發表】影像處理VI 順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-06 10:28:52 IP:61.62.xxx.xxx 未訂閱
spark184, 你好 也可以參考下列的連結喔 負片效果 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=24438 亮度調整 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=24259 彩色轉灰階 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=24246 我也在努力學習中 ^ ^
------
我也在努力學習中,若有錯謬請見諒。
系統時間:2024-05-08 6:55:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!