$WinTitle="[Class:TMsgForm]"
Opt("pixelcoordmode",2)
$notactive=hex(pixelgetcolor(40,60,$WinTitle),6)
WinActivate($Wintitle)
WinwaitActive($Wintitle)
MsgBox(0,"Цвет пикселя","Неактивного окна - " & $notactive & @CRLF & "Активного окна - " & hex(pixelgetcolor(40,60,$WinTitle),6))