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

CCL的影像問題

尚未結案
akino0910
一般會員


發表:34
回覆:52
積分:16
註冊:2005-09-30

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-10-17 15:47:24 IP:220.139.xxx.xxx 未訂閱
想請問各位高手,我要用bcb寫出以張影像經過CCL的處裡所展現出來的結果,後來程式跑出來都是一整張影像為一整片灰階值相同的影像,後來我去測試,好像它在計算相連通最大區域的部份就有問題了> < 可是我卻怎麼也找不到問題在哪....請各位高手幫我看一下我的程式碼 感激不盡^^
 
void __fastcall TForm1::Button6Click(TObject *Sender)
{
Graphics::TBitmap *bmp1 = new Graphics::TBitmap();
Graphics::TBitmap *bmp2 = new Graphics::TBitmap();
Graphics::TBitmap *bmp3 = new Graphics::TBitmap();
Graphics::TBitmap *bmp4 = new Graphics::TBitmap();
Graphics::TBitmap *bmp5 = new Graphics::TBitmap();
Graphics::TBitmap *bmp6 = new Graphics::TBitmap();
Graphics::TBitmap *bmp7 = new Graphics::TBitmap();
Byte *ptr1=NULL,*ptr2=NULL,*ptr3=NULL,*ptr4=NULL,*ptr5=NULL,*ptr6=NULL,*ptr7=NULL;
int x,y,n=0,loop,max;
int Control_NA=50;
bmp1=Image5->Picture->Bitmap;
bmp3=Image4->Picture->Bitmap;
bmp1->Width = bmp3->Width;
bmp1->Height = bmp3->Height;
bmp2->Width = bmp3->Width;
bmp2->Height = bmp3->Height;
bmp1->PixelFormat=pf24bit;
bmp3->PixelFormat=pf24bit;
bmp4->Assign(bmp1);
bmp5->Assign(bmp1);
bmp6->Assign(bmp1);
bmp7->Assign(bmp1);    for(int i=0;iHeight;i  )
{
  ptr1 = (Byte *)bmp1->ScanLine[i];
  for(int j=0;jWidth;j  )
  {
    ptr1[j]=0;
  }
}    float label=0;
float newlabel;
 for(int i=0;iHeight;i  )
 {
  ptr2 = (Byte *)bmp2->ScanLine[i];
  ptr3 = (Byte *)bmp3->ScanLine[i];
  for(int j=0;jWidth;j  )
  {
    ptr2[j]=0;
    if(ptr3[j]==1)
    {
     label=label 1;
     ptr2[j]=label;
    }
     else ptr2[j]=0;
  }
 }    max=(int)label;
ShowMessage(AnsiString("maxlabel")   max );//我的程式在這裡顯現計算相連通面積的點數就不對了....
......
....
..
..    
系統時間:2024-05-10 6:37:09
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!