找回密码  加入

AUTOIT CN

搜索
查看: 311|回复: 6

[效率算法] 【解决】怎么样同时执行多个func

[复制链接]
发表于 2018-12-7 16:55:22 | 显示全部楼层 |阅读模式
本帖最后由 3131210 于 2018-12-7 21:19 编辑

有什么办法可以同时执行func Example吗?代码有sleep  因为要运行一些应用进行同样操作  但是打开的时候要等几秒

  1. Dim $iPID[5]

  2. For $i = 1 To 5
  3.         Example($i)
  4. Next

  5. Func Example($number)
  6.         $iPID[$number - 1] = Run('notepad.exe', '')
  7.         Sleep(3000)
  8.         ProcessClose($iPID[$number - 1])
  9. EndFunc   ;==>Example
复制代码



发表于 2018-12-7 19:54:28 | 显示全部楼层
多进程吧!比较简单
发表于 2018-12-7 20:04:53 | 显示全部楼层
  1. Dim $iPID[5]
  2. If $CmdLine[0]=1 Then

  3.         Example($CmdLine[1])
  4. Else
  5.         For $i = 1 To 5
  6.                 Run(@ScriptFullPath & ' '&$i)
  7.         Next
  8. EndIf

  9. Func Example($number)
  10.         $iPID[$number - 1] = Run('notepad.exe', '')
  11.         Sleep(3000)
  12.         ProcessClose($iPID[$number - 1])
  13. EndFunc        ;==>Example
复制代码


发表于 2018-12-7 20:05:17 | 显示全部楼层
编译后使用
 楼主| 发表于 2018-12-7 20:14:24 | 显示全部楼层
这个也是多进程吧
 楼主| 发表于 2018-12-7 21:19:25 | 显示全部楼层
  1. #include "CoProc.au3"

  2. _CoProc("Test_1(1)")
  3. _CoProc("Test_2(2)")

  4. Func Test_1($sText)
  5.         Local $iPID = Run('cmd')
  6.         Sleep(3000)
  7.         $var = WinList()
  8.         For $i = 1 To $var[0][0]
  9.                 $temppid = WinGetProcess($var[$i][1])
  10.                 If $temppid = $iPID Then ExitLoop
  11.         Next
  12.         ControlSend($var[$i][1], '', '', $sText)
  13. EndFunc   ;==>Test_1

  14. Func Test_2($sText)
  15.         Local $iPID = Run('cmd')
  16.         Sleep(3000)
  17.         $var = WinList()
  18.         For $i = 1 To $var[0][0]
  19.                 $temppid = WinGetProcess($var[$i][1])
  20.                 If $temppid = $iPID Then ExitLoop
  21.         Next
  22.         ControlSend($var[$i][1], '', '', $sText)
  23. EndFunc   ;==>Test_2
复制代码

最后还是用CoProc多进程解决的
发表于 2018-12-25 17:19:10 | 显示全部楼层
CoProc.au3  正解,哈哈
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备15028933号-3 )谷歌 百度

GMT+8, 2019-1-19 17:29 , Processed in 0.089201 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表