AutoItX 2021-02-27 21;06;19-瞬间透明几乎所有窗口-爱哔哩(B站视频、音频mp3解析下载站)

AID:

CID:

视频图片:

作者头像:

弹幕地址:

视频描述:

热门回复：

BI4PWI_专业的门外汉:000000000 ;WinSetTrans("乌龙派出所", "", 150) $var = WinList() For $i = 1 to $var【0】【0】 ; 仅显示带标题的可见窗口 If $var【$i】【0】 <> "" AND IsVisible($var【$i】【1】) Then WinSetTrans($var【$i】【0】 , "", 150) ;MsgBox(0, "详情", "标题=" & $var【$i】【0】 & @LF & "句柄=" & $var【$i】【1】) EndIf Next Func IsVisible($handle) If BitAnd( WinGetState($handle), 2 ) Then Return 1 Else Return 0 EndIf EndFuncWinSetTrans("乌龙派出所", "", 150) ; 让记事本半透明.
BI4PWI_专业的门外汉:;WinSetTrans("乌龙派出所", "", 150) $var = WinList() For $i = 1 to $var【0】【0】 ; 仅显示带标题的可见窗口 If $var【$i】【0】 <> "" AND IsVisible($var【$i】【1】) Then WinSetTrans($var【$i】【0】 , "", 150) ;MsgBox(0, "详情", "标题=" & $var【$i】【0】 & @LF & "句柄=" & $var【$i】【1】) EndIf Next Func IsVisible($handle) If BitAnd( WinGetState($handle), 2 ) Then Return 1 Else Return 0 EndIf EndFuncWinSetTrans("乌龙派出所", "", 150) ; 让记事本半透明.