请教一下，在模拟器中使用 GetRunningApp()命令判断某个APP是否运行是可行的，但是打包小精灵后在雷电云手机中运行却不行，我修改代码进行测试，测试代码如下：Function 运行程序检测() dim appList = GetRunningApp() 调试输出 ("读取运行APP清单数量：" & Len(appList)) For N = 1 To Len(appList) 调试输出("清单"&N&":"&appList[N]) Next For i = 1 To Len(appList) If appList = "com.langsheng.cszr.ld" Then 运行程序检测 = true Exit Function End If Next 运行程序检测 = FalseEnd Function
在模拟器中得到的清单很多，但是在云手机中，不管程序是否运行，得到的结果都是这样的：
读取运行APP清单数量：1
清单1：com.cszr.ld:com.nvhtc.btcev:ezxic
这里得到的包名都不一样了，而且重点是"com.langsheng.cszr.ld"这个APP不管是否运行，都是这样的结果。
奇怪的是在云手机中，使用RunApp ("com.langsheng.cszr.ld")命令是可以启动APP的。
我也尝试过使用ADB命令来进行检测：
Function 检测APP进程运行(目标包名) Dim cmd, result cmd = "adb shell ps | findstr """ & 目标包名 & """" result = Sys.Execute(cmd) // 执行ADB命令 If Len(Trim(result)) > 0 Then TracePrint "检测到进程：" & result 检测APP进程运行 = True Else TracePrint "未检测到进程" 检测APP进程运行 = False End IfEnd Function// 主程序调用Dim 目标APP = "com.langsheng.cszr.ld"If 检测APP进程运行(目标APP) Then TracePrint "目标APP正在运行！"Else TracePrint "目标APP未运行！"End If
依然失败，得到的结果是这样的：
检测到进程：sh: <stdin>[1]: adb: not foundsh: <stdin>[1]: findstr: not found
目标APP正在运行！
所以，这个问题该如何解决比较好？有没有其他人也碰到过这个问题？该如何解决？
闽公网安备 35010002000112号