论坛 › 『 提问交流 』 › 子脚本使用了非数组变量.

konglijun 发表于 2009-7-6 02:38:25

子脚本使用了非数组变量.

本帖最后由 konglijun 于 2009-7-6 02:56 编辑

确定
Line -1:
Error: 子脚本使用了非数组变量.


这是为什么,我要编辑器里运行的一点都没有错,一编译成.exe后运行,就报错.........哪位帮帮忙


加上错误停止的这块代码

Func jx()
        WinActivate($Win)
        $array = WinGetPos($Win)
        $rc = 50
        Sleep(1000)
        For $B = 1 To 6
                ToolTip("找医生", 0, 0)
                Sleep(1000)
                $result = _ImageSearchArea(@ScriptDir & "\医" & $B & ".bmp", 1, $array,$array,$array,$array, $x1, $y1, $rc)
                If $result = 1 Then
                        MyMouseMovee($x1, $y1 + 10, 2, 2)
                        Sleep(100)
                        MouseDown("left")
                        Sleep(100)
                        MouseUp("left")
                        ExitLoop
                EndIf
        Next

        If $result = 1 Then
                For $i = 1 To $Win
                        WinActivate($Win[$i])
                        While 1
                                Sleep(500)
                                $coord4 = PixelSearch(167, 322, 364, 464, 0x08F448, 1)
                                If Not @error Then

                                        Sleep(300)
                                        MyMouseMovee($coord4, $coord4 + 2, 2, 2)
                                        Sleep(100)
                                        MouseDown("left")
                                        Sleep(100)
                                        MouseUp("left")
                                        ExitLoop
                                EndIf
                        WEnd
                        While 1
                                Sleep(500)
                                $coord3 = PixelSearch(167, 322, 330, 304, 0xF8FCF8, 1)
                                If Not @error Then
                                        MyMouseMovee($coord3, $coord3 + 2, 2, 2)
                                        Sleep(100)
                                        MouseDown("left")
                                        Sleep(100)
                                        MouseUp("left")
                                        ExitLoop
                                EndIf
                        WEnd
                Next

        EndIf


        If $result = 1 Then

                Return 1
        Else
                Return 0
        EndIf

EndFunc   ;==>jx

kn007 发表于 2009-7-6 07:30:44

吧全部搞上来吧，这只是func，数组都在上面

查看完整版本: 子脚本使用了非数组变量.