Pixel Grab

[FinalVersion]

Suggest anything you feel needed in this program, at the moment I have no new ideas for the program.

Current Version: Release

Always Check Last Post For Current Version!

[corgano]

If you do mutiple grabs quickly, it returns the same value for all of them.

Looking at it I was able to come up with this:

HotKeySet("{F11}","grab")
HotKeySet("{ESC}","foo")

while 1
    sleep(100)
WEnd

func grab()
    $pos = MouseGetPos()
    $pixel_hex = PixelGetColor($pos[0],$pos[1])
    $pixel_dec = Dec($pixel_hex)
    MsgBox(0,"Retrieved",$pixel_dec)
    ToolTip($pixel_dec,$pos[0],$pos[1],"Result")
    Sleep(2000)
    ToolTip("")
EndFunc

Func foo()
    Exit
EndFunc

This code, no matter how fast you grab the pixel color, will always display the correct number and tooltip in the correct spot.

~corgano

[FinalVersion]

If you do mutiple grabs quickly, it returns the same value for all of them.

Looking at it I was able to come up with this:

HotKeySet("{F11}","grab")
HotKeySet("{ESC}","foo")

while 1
    sleep(100)
WEnd

func grab()
    $pos = MouseGetPos()
    $pixel_hex = PixelGetColor($pos[0],$pos[1])
    $pixel_dec = Dec($pixel_hex)
    MsgBox(0,"Retrieved",$pixel_dec)
    ToolTip($pixel_dec,$pos[0],$pos[1],"Result")
    Sleep(2000)
    ToolTip("")
EndFunc

Func foo()
    Exit
EndFunc

This code, no matter how fast you grab the pixel color, will always display the correct number and tooltip in the correct spot.

~corgano

Yeah well it took 5mins to make the script if that.

[Hest]

I often use alot of different colors while making websites or playing around with pictures. I usually use something like paintshop to get the colorvalue and then copy/paste it, but I changes this script a little and made it, so I can just press F11 and the color is in the clipboard, ready for use

expandcollapse popup

#include <WindowsConstants.au3>
#include <GUIConstants.au3>
Global $pixel_last
HotKeySet("{F11}","clip")
HotKeySet("{ESC}","endme")
#Region ### START Koda GUI section ### Form=
$Pixelgrab_form = GUICreate("Color Grab", 177, 85, 797, 354)
$font_group     = GUICtrlCreateGroup("Color", 12, 8, 153, 65)
$font_label     = GUICtrlCreateLabel("Label1", 50, 32, 90, 21)
GUICtrlSetFont(-1, 12, 800, 0, "Verdana")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    sleep(100)
    Call("grab")
    
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

func grab()
    $pos = MouseGetPos()
    $pixel_hex = Hex(PixelGetColor($pos[0],$pos[1]), 6)
    
    If $pixel_last <> $pixel_hex Then
        GUICtrlSetData($font_label, "#" & $pixel_hex)
    EndIf
    $pixel_last = $pixel_hex
EndFunc

Func clip()
    ClipPut ("#" & $pixel_last)
EndFunc

Func endme()
    Exit
EndFunc

[nusaki]

here is lil update it shows u coordinates too . Great job nice program

HotKeySet("{F11}","grab")

HotKeySet("{ESC}","foo")

while 1

sleep(100)

WEnd

func grab()

$pos = MouseGetPos()

$pixel_hex = PixelGetColor($pos[0],$pos[1])

$pixel_dec = Dec($pixel_hex)

MsgBox(0,"Retrieved",$pixel_dec &" ("&$pos[0]&","&$pos[1]&")")

ToolTip($pixel_dec,$pos[0],$pos[1],"Result")

Sleep(2000)

ToolTip("")

EndFunc

Func foo()

Exit

EndFunc