[提问] 按键精灵手机版子线程貌似不能使用读内存的函数 [复制链接]

Function 当前坐标()
Dim 当前应用包名 = Sys.GetFront()
Dim 坐标特征码位置 = 根据特征码得到地址("0x0",当前应用包名, 1071120384, 1066401792, 4,"I32")
Dim X地址 = 地址相加(坐标特征码位置, -28)
Dim Y地址 = 地址相加(X地址, 4)
Dim Xzuob=Sys.MemoryRead(当前应用包名,X地址, "i32")
Dim Yzuob=Sys.MemoryRead(当前应用包名,Y地址, "i32")
Thread.SetShareVar "当前X坐标", Xzuob
Thread.SetShareVar "当前Y坐标", Yzuob
TracePrint "当前X坐标为:" & Xzuob,"当前Y坐标为:" & Yzuob
Do While True
Delay 100
If Xzuob & Yzuob <> Sys.MemoryRead(当前应用包名, X地址, "i32") & Sys.MemoryRead(当前应用包名, Y地址, "i32") Then
Xzuob=Sys.MemoryRead(当前应用包名,X地址, "i32")
Yzuob=Sys.MemoryRead(当前应用包名,Y地址, "i32")
TracePrint "当前X坐标为:"&Sys.MemoryRead(当前应用包名,X地址, "i32"), "当前Y坐标为:"&Sys.MemoryRead(当前应用包名,Y地址, "i32")    
End If
Loop
End Function

把这个函数当成子线程，怎么一运行 按键精灵一调试就异常退出，把这个函数放在主线程里就没事，什么情况呐？？？