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

不規則形狀擷取到Form2上的問題

尚未結案
kobebryant81
一般會員


發表:15
回覆:15
積分:6
註冊:2007-05-08

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-05-11 20:19:13 IP:140.135.xxx.xxx 訂閱
我在Form1的Image1上有一張圖,我在上面利用多邊型函式畫了一個多邊型,劃完後會找出X,Y的最大最小值,利用最大最小值對多邊型會匡出一個方形再利用最大最小值找到多邊型的中間點做區域成長把圖形畫到Form2的image1上,以下是我區域成長的程式,但我裡面寫到Form2->image,很奇怪都跑出Form2,但上面都沒有東西,但我把他畫到Form1的Image2上,就可以畫出多邊型內的圖案,是哪裡疏忽了嗎? 

<textarea class="cpp" rows="10" cols="60" name="code">void TForm1::grow(Byte *data,int i,int j) { if(i<0||i>W-1||j<0||j>H-1) return; //檢查有無超出圖形邊界 if(grow_mark[(j-min_y)*tongue_W (i-min_x)]==255) return;//檢查pixel是否已經秀過 if(Image1->Canvas->Pixels[i][j]==clRed||Image1->Canvas->Pixels[i][j]==clLime)return;//如果到達邊界return if(Image1->Canvas->Pixels[i][j]!=clRed||Image1->Canvas->Pixels[i][j]!=clLime)//沒達到邊界,秀出pixel { Form2->Image1->Canvas->Pixels[i][j]=TColor RGB(GetRValue(Image1->Canvas->Pixels[i][j]),GetGValue(Image1->Canvas->Pixels[i][j]),GetBValue(Image1->Canvas->Pixels[i][j])); grow_mark[(j-min_y)*tongue_W (i-min_x)]=255; pix ; } grow(data ,i,j-1); grow(data ,i 1,j); grow(data ,i,j 1); grow(data ,i-1,j); } </textarea>
編輯記錄
taishyang 重新編輯於 2007-05-14 09:27:32, 註解 將文章分類成[問題]‧
系統時間:2024-05-02 22:35:31
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!