Finder Tool, Iconcina trascinabile...

#Include <WinAPI.au3>
;###############################################################
$gui = GUICreate("Finder Tool",100,80)
$n2 = GUICtrlCreateIcon("shell32.dll", 3, 30, 20, 32, 32) ;questo deve essere messo per forza dopo "GuiCreate" senṇ nn funziona
;###############################################################
GUICtrlCreateGroup("Finder Tool",3,3,70,55)
GUIsetState()
While 1
$msg = GUIGetMsg()
if $msg = 3 Then
while 1
_WinAPI_SetCursor(43)
$msg = GUIGetMsg()
$mouse = MouseGetPos()
$colore = PixelGetColor($mouse[0],$mouse[1])
if $msg = -8 then
MsgBox(0,"Finder tool","Registrato:"&@CRLF&"Posizione del mouse : "&$mouse[0]&","&$mouse[1]&@CRLF&"Colore : "&$colore)                
ExitLoop
EndIf
wend
EndIf        
if $msg = -3 then exit
wend