各位好 , 我參考了jerryKuo版主發表的作品
http://delphi.ktop.com.tw/board.php?cid=168&fid=921&tid=34733
擷取裡頭這段程式碼


[code cpp]
dX = (double)w/(double)newW;
dY = (double)h/(double)newH;
for(j = 0 ; j < newH ; j )
for(i =0 ; i < newW ; i )
{
x = dX*(double)i;
y = dY*(double)j;

ix = (int)x; iy = (int)y;
fx = x - (float)ix; fy = y - (float)iy;
nclr1 = GetRValue(Bmp->Canvas->Pixels[ix][iy]);
nclr2 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy]);
nclr3 = GetRValue(Bmp->Canvas->Pixels[ix][iy 1]);
nclr4 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy 1]);
// Bilinear
clrR=(byte)((1.0-fx)*(1.0-fy)*(double)nclr1 (fx)*(1.0-fy)*(double)nclr2
(1.0-fx)* (fy)*(double)nclr3 (fx)* (fy)*(double)nclr4);
}
[/code]
假設 原始 寬高為5 , 放大2倍後 newW＝10 , newH =10,
當 i 與 j 等於 newW-1 , newH-1時 , ix = 4 , iy=4
此時 執時此行 nclr2 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy]);
ix 1=5 照理說空間不就爆了, 最多只到Bmp->Canvas->Pixels[4][4] (5*5影像) ... 但我執行卻不會出錯
只是放大後的圖在最右邊和最下面兩行的像素值不知讀到哪裡的值 , 會出現其他像素值
我很好奇為什麼空間不會爆呢??
謝謝解答

編輯記錄

說真的

我也是用這個雙線性內插

但是不是不爆 是不到重要關頭他才不爆

所以還是乖乖加上判斷式吧


[code cpp]
/**** 雙線性內插 ****/
dX = (double)ww/(double)newW;
dY = (double)hh/(double)newH;

for(j = 0 ; j < newH ; j )
{
for(i =0 ; i < newW ; i )
{
XX = dX*(double)i;
YY = dY*(double)j;

ix = (int)XX; iy = (int)YY;
fx = XX - (double)ix; fy = YY - (double)iy;

// Bilinear 加上邊界判斷式
if( (ix nclr1 = NBmp[ix ww*iy];
else if( (ix>=ww)&&(iy nclr1 = NBmp[ww-1 ww*iy];
else if( (ix=hh) )
nclr1 = NBmp[ix ww*(hh-1)];
else
nclr1 = NBmp[ww-1 ww*(hh-1)];

if( (ix 1 nclr2 = NBmp[ix 1 ww*iy];
else if( (ix 1>=ww)&&(iy nclr2 = NBmp[ww-1 ww*iy];
else if( (ix 1=hh) )
nclr2 = NBmp[ix 1 ww*(hh-1)];
else
nclr2 = NBmp[ww-1 ww*(hh-1)];

if( (ix nclr3 = NBmp[ix ww*(iy 1)];
else if( (ix>=ww)&&(iy 1 nclr3 = NBmp[ww-1 ww*iy];
else if( (ix=hh) )
nclr3 = NBmp[ix ww*(hh-1)];
else
nclr3 = NBmp[ww-1 ww*(hh-1)];

if( (ix 1 nclr4 = NBmp[ix 1 ww*(iy 1)];
else if( (ix 1>=ww)&&(iy 1 nclr4 = NBmp[ww-1 ww*iy];
else if( (ix 1=hh) )
nclr4 = NBmp[ww-1 ww*(hh-1)];
else
nclr4 = NBmp[ww-1 ww*(hh-1)];


clr=(double)((1-fy)*((1-fx)*nclr1 fx*nclr2) fy*((1-fx)*nclr3 fx*nclr4));

RBmp[i newW*j] =((clr)>WBN)?255.0:0.0;
}
}
/**** 雙線性內插 **END**/
[/code]





===================引 用 kobebryant81 文 章===================
各位好 , 我參考了jerryKuo版主發表的作品
http://delphi.ktop.com.tw/board.php?cid=168&fid=921&tid=34733
擷取裡頭這段程式碼


[code cpp]
dX = (double)w/(double)newW;
dY = (double)h/(double)newH;
for(j = 0 ; j < newH ; j )
for(i =0 ; i < newW ; i )
{
x = dX*(double)i;
y = dY*(double)j;

ix = (int)x; iy = (int)y;
fx = x - (float)ix; fy = y - (float)iy;
nclr1 = GetRValue(Bmp->Canvas->Pixels[ix][iy]);
nclr2 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy]);
nclr3 = GetRValue(Bmp->Canvas->Pixels[ix][iy 1]);
nclr4 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy 1]);
// Bilinear
clrR=(byte)((1.0-fx)*(1.0-fy)*(double)nclr1 (fx)*(1.0-fy)*(double)nclr2
(1.0-fx)* (fy)*(double)nclr3 (fx)* (fy)*(double)nclr4);
}
[/code]
假設 原始 寬高為5 , 放大2倍後 newW＝10 , newH =10,
當 i 與 j 等於 newW-1 , newH-1時 , ix = 4 , iy=4
此時 執時此行 nclr2 = GetRValue(Bmp->Canvas->Pixels[ix 1][iy]);
ix 1=5 照理說空間不就爆了, 最多只到Bmp->Canvas->Pixels[4][4] (5*5影像) ... 但我執行卻不會出錯
只是放大後的圖在最右邊和最下面兩行的像素值不知讀到哪裡的值 , 會出現其他像素值
我很好奇為什麼空間不會爆呢??
謝謝解答

------
恩...

謝謝您的回應～～