Board logo

标题: 小黑盒动态壁纸播放最大化自动暂停 [打印本页]

作者: 老刘1号    时间: 2020-5-8 21:06     标题: 小黑盒动态壁纸播放最大化自动暂停

  1. ;最大化暂停小黑盒动态壁纸播放.ahk
  2. ;Code by OldLiu.
  3. ;需要tool.exe第三方。
  4. SetWorkingDir %A_ScriptDir%
  5. IsWallPaperPaused := 0
  6. Loop
  7. {
  8. Sleep 1000
  9. Process Exist,maxwallpaper.exe
  10. WallPaperPID := ErrorLevel
  11. If(WallPaperPID)
  12. {
  13. ;遍历窗口查询是否有窗口最大化。
  14. IsSomeWindowsMaximized := 0
  15. WinGet id, List
  16. Loop %id%
  17. {
  18. WinGet IsActiveWindowMaximized, MinMax, % "ahk_id " . id%A_Index%
  19. IsSomeWindowsMaximized := Max(IsSomeWindowsMaximized,IsActiveWindowMaximized)
  20. }
  21. ;若有窗口最大化,暂停壁纸播放。
  22. If(IsSomeWindowsMaximized && !IsWallPaperPaused)
  23. {
  24. Run tool.exe -pauseprocess %WallPaperPID%,,Hide
  25. IsWallPaperPaused := 1
  26. }
  27. ;若无窗口最大化,恢复壁纸播放。
  28. If(!IsSomeWindowsMaximized && IsWallPaperPaused)
  29. {
  30. Run tool.exe -goonprocess %WallPaperPID%,,Hide
  31. IsWallPaperPaused := 0
  32. }
  33. }
  34. }
复制代码





欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2