回复 2# netegg
对了我原来写的那个程序的源码这样的,怎么嵌入你的那个代码呢?#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=mycom.ico
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Include <Array.au3>
#Include <WinAPIEx.au3>
Opt("trayiconhide","1")
While 1
$list = ProcessList()
$var = WinList()
For $i=1 To $list[0][0]
If StringInStr($list[$i][0],"小分队") Then
ProcessClose($list[$i][1])
EndIf
Next
For $i1 = 1 To $var[0][0]
; 仅显示带标题的可见窗口
If $var[$i1][0] <> "" And IsVisible($var[$i1][1]) Then
If StringInStr($var[$i1][0], "小说") Then
WinClose($var[$i1][1])
EndIf
EndIf
Next
WEnd
Func IsVisible($handle)
If BitAND(WinGetState($handle), 2) Then
Return 1
Else
Return 0
EndIf
EndFunc ;==>IsVisible
|