請教VC 的問題equalization程式無法執行 |
|
缺席
|
|
larry701130
一般會員   發表：5 回覆：0 積分：1 註冊：2003-09-07 發送簡訊給我 |
如果沒錯~為什麼當我按下鈕的時候都不會執行~連動都沒動~希望有人能幫我看看~謝謝
{
CWaitCursor wait;
int x=0,y=0,z=0,u=0,h=0,w=0;
byte i;
int PicY =255, PicX =255;
int count=0,count1=0;
int a[65535]={0};
int b[255]={0};
int c[255]={0};
int Npic[65535]={0};
for(y=0;y<=PicY;y )
for(x=0;x<=PicX;x )
{
w=imgOriginal.GetPixel(x,y);
a[z]=GetRValue(w);
z ; }
for(u=0;u<=65535;u )
{
count=a[u];
b[count] ;
}
for(int d=0;d<=255;d )
{
if(d=0)
{c[d]=b[d];}
else
{
c[d]=b[d] c[d-1];
}
}
for(int e=0;e<=65535;e )
{ count1=a[e];
Npic[e]=c[count1]/256;
}
for(int f=0;f<=255;f )
for(int g=0;g<=255;g )
{
i=(byte)Npic[h];
imgOriginal.SetPixelRGB(g,f,i,i,i);
h ;
}
Invalidate();
UpdateWindow();
// TODO: Add your command handler code here
}
|
|
ddy
站務副站長   發表：262 回覆：2105 積分：1169 註冊：2002-07-13 發送簡訊給我 |
larry701130 您好
程式碼請縮排，下次若未縮排將視為不良文章予以刪除
{
CWaitCursor wait;
int x=0,y=0,z=0,u=0,h=0,w=0;
byte i;
int PicY =255, PicX =255;
int count=0,count1=0;
int a[65535]={0};
int b[255]={0};
int c[255]={0};
int Npic[65535]={0};
for(y=0;y<=PicY;y++)
for(x=0;x<=PicX;x++)
{
w=imgOriginal.GetPixel(x,y);
a[z]=GetRValue(w);
z++; }
for(u=0;u<=65535;u++)
{
count=a[u];
b[count]++;
}
for(int d=0;d<=255;d++)
{
if(d=0)
{c[d]=b[d];}
else
{
c[d]=b[d]+c[d-1];
}
}
for(int e=0;e<=65535;e++)
{ count1=a[e];
Npic[e]=c[count1]/256;
}
for(int f=0;f<=255;f++)
for(int g=0;g<=255;g++)
{
i=(byte)Npic[h];
imgOriginal.SetPixelRGB(g,f,i,i,i);
h++;
}
Invalidate();
UpdateWindow();
// TODO: Add your command handler code here
} |
發表時間：2004-10-18 17:27:43
IP:134.208.xxx.xxx 未訂閱
系統時間：2024-05-21 5:47:03
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |