小弟用BCB寫一程式是讓影像產生垂直弦波但是不知為何未造影像會成延遲 以下是小弟所寫的程式請各位大大看看哪還需要改進的地方 謝謝 

          void __fastcall TCap::vsinwave_noise() //垂直弦波
{        Graphics::TBitmap *bmp = new Graphics::TBitmap();
    Byte *ptr;
    int period;
    int amp;
    int i,j;
        int k=0;        int gray;
float per, PI=4.*atan(1.);                    //--------------------------------------
          // 調整弦波強度
       amp= Form1->ScrollBar1->Position;
       period =Form1->ScrollBar2->Position;
       per=2*PI/period;
        Form1->Edit1->Text = Form1->ScrollBar1->Position;
       Form1->Edit2->Text = Form1->ScrollBar2->Position;          //----------------------------------------
    bmp->Assign(Form1->Image1->Picture->Bitmap);
    bmp->PixelFormat=pf24bit;        for(j=0; jHeight; j  ) {
        ptr = (Byte *)bmp->ScanLine[j];
        for(i=0; iWidth*3; i  ) {
                k =3;                 int R=GetRValue(bmp->Canvas->Pixels[i][j]);
             int G=GetGValue(bmp->Canvas->Pixels[i][j]);
              int B=GetBValue(bmp->Canvas->Pixels[i][j]);                 gray = (ptr[i]*28   ptr[i 1]*151  ptr[i 2]*77)/256;
                ptr[i] = ptr[i 1] = ptr[i 2] = (Byte)gray;                        int wave=amp*(1 sin(per*i));                    bmp->Canvas->Pixels[i][j]=RGB(check(R wave),check(G wave),check(B wave));                     //       //Form1->Image2->Picture->Bitmap->Canvas->Pixels[i][j]=RGB(check(R wave),check(G wave),check(B wave));                    }
    }        Form1->Image2->Picture->Assign(bmp);
   delete bmp;    }    

謝謝!! residue

residue您好: 我沒有仔細測試您的程式(因為check未定義),不過我覺得延遲的原因是下面紅色部分所造成的  

for(j=0; jHeight; j  ) 
{
 ptr = (Byte *)bmp->ScanLine[j];
 for(i=0; iWidth*3; i  ) 
 {
  k =3;
  int R=GetRValue(bmp->Canvas->Pixels[i][j]);  
  int G=GetGValue(bmp->Canvas->Pixels[i][j]);
  int B=GetBValue(bmp->Canvas->Pixels[i][j]);
  gray = (ptr[i]*28   ptr[i 1]*151  ptr[i 2]*77)/256;
  ptr[i] = ptr[i 1] = ptr[i 2] = (Byte)gray;
  int wave=amp*(1 sin(per*i));
  bmp->Canvas->Pixels[i][j]=RGB(check(R wave),check(G wave),check(B wave));
    }
  }
 

既然已經用ScanLine[j]了,為何取得RGB還用紅色部分的方式呢?? 因為ptr[i]為B, ptr[i 1]為G, ptr[i 2]為R P.S: 發問時,請加標點符號,不然很容易誤會您的意思(錯別字也請注意) 順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -

對不起阿!! 下面是 class="code"> double check(double input) { if(input>255) return 255.0; if(input<0) return 0.0; else return input; } 這就由勞大大費心了 謝謝!!

residue您好:    

引言:小弟我用大大的方法試了一下還是會延遲的

您是的結果呢? 方便PO上來嗎? 順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

以下是小弟再修改之後的結果及程式雖然影像不會延遲,但變得怪怪的還請大大指導一番!!          謝謝!!            

 
  void __fastcall TCap::vsinwave_noise() //垂直弦波
{        Graphics::TBitmap *bmp = new Graphics::TBitmap();
    Byte *ptr;
    int period;
    int amp;
    int i,j;
    
       int vsinwav;
    int gray;
float per, PI=4.*atan(1.);                 //--------------------------------------
          // 調整弦波強度
       amp= Form1->ScrollBar1->Position;
       period =Form1->ScrollBar2->Position;
       per=2*PI/period;
        Form1->Edit1->Text = Form1->ScrollBar1->Position;
       Form1->Edit2->Text = Form1->ScrollBar2->Position;          //----------------------------------------
    bmp->Assign(Form1->Image1->Picture->Bitmap);
    bmp->PixelFormat=pf24bit;        for(j=0; jHeight; j++) {
        ptr = (Byte *)bmp->ScanLine[j];
        for(i=0; iWidth*3; i+=1) {        int wave=amp*(1+sin(per*i));       vsinwav=(check(ptr[i+2]+wave)+check(ptr[i+1]+wave)+check(ptr[i]+wave));
                 ptr[i] = ptr[i+1] = ptr[i+2] = (Byte)vsinwav;                    }
    }        Form1->Image2->Picture->Assign(bmp);
   delete bmp;    }        

residues您好:  

引言:雖然影像不會延遲,但變得怪怪的還請大大指導一番!!

哪裡怪?能說明一下嗎?? 順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

謝謝大大的回應!!            小弟之所以會覺得怪怪的地方是修改之前的影像雖會延遲但擷果較為正確,而修改過後則反之以下是兩張修改前和修改後的影像請大大指教                  以下為修改後的垂直弦波影像較模糊 以下為修改前的垂直弦波影像較清晰 發表人 - residue 於 2003/08/28 02:24:49 發表人 - residue 於 2003/08/28 02:25:48

引言:

 
void __fastcall TCap::vsinwave_noise() //垂直弦波
{        Graphics::TBitmap *bmp = new Graphics::TBitmap();
    Byte *ptr;
    int period;
    int amp;
    int i,j;
    
    int vsinwav;
    int gray;
    float per, PI=4.*atan(1.);              //-------調整弦波強度--------------------------
       amp                = Form1->ScrollBar1->Position;
       period             = Form1->ScrollBar2->Position;
       per                = 2*PI/period;
       Form1->Edit1->Text = Form1->ScrollBar1->Position;
       Form1->Edit2->Text = Form1->ScrollBar2->Position;
      //----------------------------------------        bmp->Assign(Form1->Image1->Picture->Bitmap);
    bmp->PixelFormat=pf24bit;
    
    int wave;        for(j=0; jHeight; j  ) 
    {
        ptr = (Byte *)bmp->ScanLine[j];
        for(i=0; iWidth*3; i =1)  
        for(i=0; iWidth; i  ) 
        {
            wave    = amp*(1 sin(per*i));
            vsinwav = (check(ptr[i 2] wave) check(ptr[i 1] wave) check(ptr[i] wave));
            ptr[i] = ptr[i 1] = ptr[i 2] = (Byte)vsinwav;
            vsinwav = (check(ptr[2] wave) check(ptr[1] wave) check(ptr[0] wave));
            ptr[0] = ptr[1] = ptr[2] = (Byte)check(vsinwav);           
            ptr =3;
        }
    }        Form1->Image2->Picture->Assign(bmp);
    delete bmp;
}

你好: 以下是用猜 1. i 值怪怪的, 如果沒猜錯的話(),

感謝taishyang ,JerryKuo大大的回覆在下問題已決解了 謝謝!!

residue你好: 可不可以請你發表一下影像產生垂直弦波,因為我蠻想知道他是做什麼用的?