一个奇怪的图像灰度问题,高手请进,急啊!!!!!!!
ayuu 2003-05-07 12:50:14 我先将图像中某点(比如说0,0点)的灰度读取出来:
rgb1 = GetPixel(picbox.hdc, 0, 0)
bblue1 = Blue(rgb1)
bred1 = Red(rgb1)
bgreen1 = Green(rgb1)
grayvalue = 0.3 * bred1 + 0.59 * bgreen1 + 0.11 * bblue1'灰度
然后我希望使该点(0,0点)的灰度值提升2,于是:
SetPixelV hdc1, 0, 0, RGB(grayvalue+2,grayvalue+2,grayvalue+2)
SavePicture , App.Path & "\test.bmp"
但是,当我打开重新打开文件,发现,灰度并没有改变。
picbox.picture=loadpicture app.path & "\test.bmp"
rgb1 = GetPixel(picbox.hdc, 0, 0)
bblue1 = Blue(rgb1)
bred1 = Red(rgb1)
bgreen1 = Green(rgb1)
grayvalue = 0.3 * bred1 + 0.59 * bgreen1 + 0.11 * bblue1'灰度
此时的grayvalue还是等于以前的那个。
为什么啊????????