之前一直在xp写编写的,完全木有问题,今天拿到Win7下运行一看,卡了半天不动,一检查,居然是PixelGetColor卡了。
网上有说ahk的这个函数也有这种问题,但是人家有个UDF可以解决(FastPixelGetColor函数),不知道au3的有木有捏?
出问题的代码如下Func GETCUBEPIXEL()
For $i=0 To $col-1
For $j=0 To $row-1
$color=PixelGetColor(($baseX+$i*$pixelSP),($baseY+$j*$pixelSP))
If $color=0xEDEDED or $color=0xF7F7F7 Then
$color=0xFFFFFF
EndIf
$cube[$i][$j]=$color;
ConsoleWrite(StringFormat("%X",$cube[$i][$j]) & "(" & $j & "," & $i & ")_")
Next
ConsoleWrite(@CRLF)
Next
EndFunc
正常情况下一运行就输出颜色矩阵了,结果Win7Aero下是一个一个输出的- -各种囧
求高手指导啊~~~~ |