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

如果利用8-chain code的方式區分區塊

尚未結案
Teresa_Chang
一般會員


發表:41
回覆:42
積分:16
註冊:2004-05-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-09-29 06:52:34 IP:218.160.xxx.xxx 訂閱

我看到版上有一篇是在講利用8-chain code的方式,找出圖片中區分出不同的區塊

可是為什麼程式中的cx值表示的是區塊的大小,但是我測出來的每一個區塊大小都等於1

請問是哪裡出了問題啊?

另外,如果我希望讓不同的區塊最後不同的顏色表現出來,或是用方框框框出來不同的區塊,

是要加在Connect的函數中嗎?要怎麼寫呢?

int cx=0; //區塊大小

int c = 0; //區塊編碼

Graphics::TBitmap *BMP = new Graphics::TBitmap();

Byte *ptr=NULL;

BMP->Assign(Image1->Picture->Bitmap );

for(int y = 0; y < BMP->Height; y )

{

ptr = (Byte *) BMP->ScanLine[y];

for(int x = 0; x < BMP->Width; x )

{

if(ptr[x * 3] == 255)

{

cx= Connect(BMP, x, y);
c ;
}

}

}

delete BMP;
}

//-------------------------------------------------------------------
int __fastcall TForm1::Connect(Graphics::TBitmap * BMP, int x, int y)

{

int count=0;

count ;

BMP->Canvas->Pixels[x][y] = clBlack;

if(BMP->Canvas->Pixels[x 1][y] == clWhite)

Connect(BMP, x 1, y);


if(BMP->Canvas->Pixels[x 1][y - 1] == clWhite)

Connect(BMP, x 1, y - 1);


if(BMP->Canvas->Pixels[x][y - 1] == clWhite)

Connect(BMP, x , y - 1);



if(BMP->Canvas->Pixels[x-1][y - 1] == clWhite)

Connect(BMP, x-1, y - 1);


if(BMP->Canvas->Pixels[x-1][y] == clWhite)

Connect(BMP, x-1, y);


if(BMP->Canvas->Pixels[x - 1][y 1] == clWhite)

Connect(BMP, x - 1, y 1);



if(BMP->Canvas->Pixels[x][y 1] == clWhite)

Connect(BMP, x, y 1);


if(BMP->Canvas->Pixels[x 1][y 1] == clWhite)

Connect(BMP, x 1, y 1);

if(BMP->Canvas->Pixels[x 1][y] == clWhite)

Connect(BMP, x 1, y);

return (count);

}

Teresa_Chang
一般會員


發表:41
回覆:42
積分:16
註冊:2004-05-04

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-09-29 08:31:53 IP:218.160.xxx.xxx 訂閱


我已經自己解決了,cx值一直等於1的問題了

原來是我每次呼叫Connect函數時就把count值歸零,

所以我把count=0初始值放在程式一開始宣告的地方,

另外,我還改了下面的部分

if(Bmp->Canvas->Pixels[i][j] == clWhite)
{
cx = Connect(Bmp, i, j);
c ;
fprintf(outfile,"%d\t%d\t%d\n",cx,i,j);
count=0;
}

現在我還剩下的問題就是要如何才能用不同顏色分辨不同區塊,

或要如何用方框框將區塊分別圈出來呢?

Teresa_Chang
一般會員


發表:41
回覆:42
積分:16
註冊:2004-05-04

發送簡訊給我
#3 引用回覆 回覆 發表時間:2006-09-29 18:04:13 IP:218.160.xxx.xxx 訂閱

為什麼我跑出來的區塊數目不對,是哪裡出了問題啊?

怎麼都沒有人回應呢?

justdo
高階會員


發表:2
回覆:359
積分:222
註冊:2004-08-17

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