win10任务栏透明

能使任务栏透明,类似win10应用商店的transTB、

win10任务栏透明代码:

;重新使任务栏透明
~ESC::
~LWin::
~RWin::
~LButton::{
    sleep 300
    transparentTaskBar()
}

;Func 使任务栏透明
transparentTaskBar()
{
    ;0:表示禁用玻璃效果和透明度,窗口不会有透明效果。
    ;1:表示启用玻璃效果,通常以一种轻度透明的方式呈现窗口。
    ;2:表示启用玻璃效果,通常以更明显的透明方式呈现窗口。
    ;3:表示启用玻璃效果,通常以更明显的透明方式呈现窗口,并带有模糊效果。
    accent_state:=2
    WCA_ACCENT_POLICY := 19
    pad := A_PtrSize=8 ? 4 : 0
    gradient_color:="0x01000000"
    ACCENT_POLICY:=Buffer(16,0)
    WINCOMPATTRDATA:=Buffer( 4 + pad + A_PtrSize + 4 + pad,0)
    hTrayWnd := DllCall("User32\FindWindow", "str", "Shell_TrayWnd", "ptr", 0, "ptr")
    NumPut("int",(accent_state>0 && accent_state<4) ? accent_state : 0, ACCENT_POLICY, 0)
    NumPut("int",gradient_color, ACCENT_POLICY, 8)
    NumPut("int",WCA_ACCENT_POLICY, WINCOMPATTRDATA, 0)
    NumPut("int*",ACCENT_POLICY.ptr, WINCOMPATTRDATA, 4 + pad)
    NumPut("uint",ACCENT_POLICY.size, WINCOMPATTRDATA,  4 + pad + A_PtrSize)
    DllCall("user32\SetWindowCompositionAttribute", "ptr", hTrayWnd, "ptr", WINCOMPATTRDATA)
}

win10任务栏透明

注意目前仅对windows10及其以上系统有效!

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。

给TA捐赠
共{{data.count}}人
人已捐赠
应用

解析文本, 转换路径参数,配合runany使用

2023-9-22 15:44:41

应用

如何在打开ps,AI时自动打开大写?

2023-9-25 9:54:16

8 条回复 A文章作者 M管理员
  1. 白云朵朵

    学习

  2. 祥祥呀

    Buffer()是什么函数啊,系统识别不了啊

    • Tmz

      ahk2.x

    • 祥祥呀

      ahk1.3有啥方法替代这个buffer函数吗

    • Tmz

      VarSetCapacity

    • 祥祥呀

      直接将buffer替换为VarSetCapacity还不行,可能还需要改啥参数吧

    • Tmz

      ahk1.x 参考这篇文章,https://www.autoahk.com/archives/40246

个人中心
购物车
优惠劵
有新私信 私信列表
搜索