Re: [VB6 ] 請問如何取得圖片的像素值
'在宣告處寫下此函式
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
討論串 (同標題文章)