get color of a pixel?

[athbn]

i want to simple get the color of red(rgb) of a pixel of my monitor...

i mean from the rgb only the r is needed

then to put that in a variable

is there any function which can solve my problem?

i looked in the help file but i only got this one "_ColorGetRed"

which i think it may do the job but i don't know how

thnx

[someone]

  athbn said:

i looked in the help file but i only got this one "_ColorGetRed"

which i think it may do the job but i don't know how

thnx

Just search for pixel

EDIT: I'm having idiot moments today...

Edited April 22, 2008 by someone

[weaponx]

$result = PixelGetColor(x,y)
$red = BitAND( BitShift($result, 16), 0xff)
$green = BitAND( BitShift($nColor, 8), 0xff)
$blue = BitAND($nColor, 0xff)
MsgBox(0,"","Red: " & $red & " Green: " & $green & " Blue: " & $blue)

[MystikSpiral]

^ Nearly worked for me, though needed a little correction

Dim $result
Dim $red
Dim $green
Dim $blue
$result = PixelGetColor($x,$y)
$red = BitAND( BitShift($result, 16), 0xff)
$green = BitAND( BitShift($result, 8), 0xff)
$blue = BitAND($result, 0xff)

So happy this worked

Saved me so much time over trying to figure out html color code tables.

Edited December 15, 2012 by MystikSpiral

[JLogan3o13]

Why drag up a thread 4 1/2 years dead just to tell everyone it worked for you?!

[Bert]

agreed.

[Melba23]

MystikSpiral,

Please do NOT necro-post like this again.

M23