AutoHotkey调用系统调色板获取颜色


写脚本有时候需要选择颜色,在AutoHotkey论坛上看到了 ChooseColor 函数,由于原来的算法有点麻烦,我稍微调整了下分享出来。
并增加了 argb 的选项(不过生成的都是完全不透明的颜色,有需求的可自行调整)
以下是AutoHotkey v2 beta版代码

; https://docs.microsoft.com/en-us/windows/win32/api/commdlg/ns-commdlg-choosecolora-r1
;系统的调色板选择颜色
selectColor(bARGB:=false, bRGB:=true) { ; CC_FULLOPEN := 0x2
    CC := buffer(36+64, 0)
    numput("UPtr", 36, CC)
    numput("UPtr", hOwner:=0, CC, A_PtrSize)
    numput("UPtr", clDefault:=0, CC, A_PtrSize * 3)
    numput("UPtr", CC.ptr+36, CC, A_PtrSize * 4) ; COLORREF *lpCustColors
    numput("UPtr", flags:=3, CC, A_PtrSize * 5)
    DllCall("comdlg32\ChooseColorA", "Ptr",CC)
    if bRGB {
        nBGR := numget(CC, A_PtrSize * 3, "UPtr")
        cl := (nBGR & 0xFF) << 16 | nBGR & 0x0000FF00 | nBGR >> 16
    } else
        cl := numget(CC, A_PtrSize * 3, "UPtr")
    res := bARGB ? (0xff000000 | cl) : cl ;转成 argb,透明度为ff(完全不透明),可自行修改
    return res
}


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM