主題: [C&C++] [求助]用Borland C++Builder求面積 [打印本頁]

---

發表人: ptrlin    時間: 2008-3-16 12:28 AM     主題: [求助]用Borland C++Builder求面積

題目是 有一張圖 我將它作完二值化後 只有黑跟白
白色是它的背景 黑色為一個不規則的多邊形物體
現在要求出這個多邊形的中心以及面積

網路上看了滿多文章，可是看得十分迷糊

因此想請教大大這個該怎麼寫~
或者是市面上有那一本書籍對這個有較多的介紹，
麻煩大大們賜教~

---

發表人: ds0527    時間: 2008-3-18 04:05 PM

http://delphi.ktop.com.tw/board.php

去Delphi.ktop討論區看看吧，
很多問題在那都有人問過了。
用" BCB 面積 "當關鍵字就可以找到類似的問題~
再這介紹另一個論壇不知道會不會被打....

---

發表人: ptrlin    時間: 2008-3-22 03:54 AM

看到一個類型，跟我的需求很像，如下:

用土法煉鋼的方式 把圖讀近來
我是把二值化的圖 標成黑色 所以黑色點是有效點
下面是我用的方式 您參考看看
XX,YY 就是妳要的質心
sum就是你要的面積

void __fastcall TForm1::Button13Click(TObject *Sender)
{
Graphics::TBitmap *Bmp = new Graphics::TBitmap();
Byte *ptr;
int r,g,b;
int i,j,XX,YY;
int sum=0,X=0,Y=0;
Bmp->Assign(Image1->Picture->Bitmap);
Bmp->PixelFormat=pf24bit;

for (int i=0;iHeight;i++ )
    {
    ptr=(Byte*)Bmp->ScanLine;
    for (int j=0;jWidth; j++ )
    {
    b=ptr[j*3];
    g=ptr[j*3+1];
    r=ptr[j*3+2];

    if(r==0&&g==0&&b==0&&iHeight&&jWidth)
    {
    sum=sum+1;
    X=X+j;
    Y=Y+i;
    XX=X/sum;
    YY=Y/sum;
    Form1->Edit1->Text=XX;
    Form1->Edit2->Text=YY;
    Form1->Edit3->Text=sum;
    }
    }
    }
}
程式Run時，沒有錯誤出現
但真正去開圖執行查面積及質心時，就會當機 ~"~
上面的程式有需要修改到那裡嗎? 因為我執行時都沒有錯誤訊息出現
不知從何下手
另外請教有大大知道為什麼他質心要設到XX跟YY嗎?

---

歡迎光臨 TWed2k (http://twed2k.org/)

Powered by Discuz! 4.1.0