即如何对图片操作，改变它的亮度

Question

利用API 函数：getpixel 和 setpixel.
对每一个像素，改变它的rgb颜色。
可以成比例缩小，越小，越亮。
但是范围总是在0~255之间。

Answer 1

Private Declare Function GetPixel Lib "gdi32" _
     (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function SetPixelV Lib "gdi32" _
     (ByVal hdc As Long, ByVal x As Long, _
      ByVal y As Long, ByVal crColor As Long) As LongPrivate Function Blue(ByVal mlColor As Long) As Long
Blue = (mlColor \ &H10000) And &HFF
End FunctionPrivate Function Red(ByVal mlColor As Long) As Long
Red = mlColor And &HFF
End FunctionPrivate Function Green(ByVal mlColor As Long) As Long
Green = (mlColor \ &H100) And &HFF
End Function

Answer 2

比如我要对Image1中的图片进行处理，并在Image2中显示处理完的图片，该怎么做？

Answer 3

我想知道GetPixel取得的RGB值是怎么样的Private Type Color
    R As Long
    G As Long
    B As Long
End Typedim temp as Color
temp = GetPixel(Picture1.hdc, XX, YY)提示类型不匹配

Answer 4

dim temp as long
temp = GetPixel(Picture1.hdc, XX, YY)
R = temp  Mod 256
G = temp \ 256 Mod 256
B = temp \ 65536