作者catpin (努力写paper)
看板Visual_Basic
标题Re: [VB6 ] 请问如何取得图片的像素值
时间Sun Jan 2 12:39:36 2011
'在宣告处写下此函式
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal_
X As Long, ByVal Y As Long) As Long
'i,j表示Picture1上某一点座标值
PixCol = GetPixel(Picture1.hdc, i, j)
r = PixCol Mod 256
b = Int(PixCol / 65536)
g = (PixCol - (b(i, j) * 65536) - r(i, j)) / 256
※ 引述《bluncha (补让恰)》之铭言：
: 刚刚找出一个方法是这样
: Dim pixel_color As Color
: pixel_color = bmp1.GetPixel(x,y)
: TextBox1.Text = pixel_color.ToString()
: TextBox2.Text = pixel_color.R
: TextBox3.Text = pixel_color.G
: TextBox4.Text = pixel_color.B
: ※ 引述《bluncha (补让恰)》之铭言：
: : 想取得图片中某个像素的RGB值要如何做呢?
: : 网路上的资料看了一些还是搞不懂，
: : 所以只好请教诸位板友了，
: : 恳请协助，感谢。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 124.10.90.19