✅博乐助手：窗口_设置透明

莫小乐

  

DLL命令名	返回值类型	公开	备 注
SetWindowLongA_设置透明	整数型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
SetWindowLongA
参数名	类 型	传址	数组	备 注
hWnd	整数型
nIndex	整数型
dwNewLong	整数型

DLL命令名	返回值类型	公开	备 注
SetLayeredWindowAttributes_设置透明	逻辑型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
SetLayeredWindowAttributes
参数名	类 型	传址	数组	备 注
hWnd	整数型
crKey	整数型
bAlpha	字节型
dwFlags	整数型

DLL命令名	返回值类型	公开	备 注
GetWindowLongA_设置透明	整数型
DLL库文件名:
user32
在DLL库中对应命令名:
GetWindowLongA
参数名	类 型	传址	数组	备 注
hWnd	整数型
nIndex	整数型

子程序名	返回值类型	公开	备 注
窗口_设置透明	逻辑型		【博乐支持】成功返回真,失败返回假
参数名	类 型	参考	可空	数组	备 注
句柄	整数型				设置透明化窗口的句柄
透明度	字节型				设置整个窗口的透明度  取值范围是[0,255] 可空为不设定此参数
透明色	整数型				(#颜色)指定某颜色为完全透明(完全透明处不属于该窗口)  可空为不指定
鼠标穿透	逻辑型				真:窗口被鼠标穿透

变量名	类 型	静态	数组	备 注
样式	整数型
标志	整数型

如果 (鼠标穿透)
样式 ＝ GetWindowLongA_设置透明 (句柄, -20)
样式 ＝ 位或 (样式, 32, 524288)
SetWindowLongA_设置透明 (句柄, -20, 样式)
SetWindowLongA_设置透明 (句柄, -20, 524288)

判断 (是否为空 (透明色))
标志 ＝ 2
如果 (是否为空 (透明度))
标志 ＝ 1
标志 ＝ 3

返回 (SetLayeredWindowAttributes_设置透明 (句柄, 透明色, 透明度, 标志))

.版本 2<br /> <br /> .DLL命令 SetWindowLongA_设置透明, 整数型, "user32.dll", "SetWindowLongA"<br />     .参数 hWnd, 整数型<br />     .参数 nIndex, 整数型<br />     .参数 dwNewLong, 整数型<br /> <br /> .DLL命令 SetLayeredWindowAttributes_设置透明, 逻辑型, "user32.dll", "SetLayeredWindowAttributes"<br />     .参数 hWnd, 整数型<br />     .参数 crKey, 整数型<br />     .参数 bAlpha, 字节型<br />     .参数 dwFlags, 整数型<br /> <br /> .DLL命令 GetWindowLongA_设置透明, 整数型, "user32", "GetWindowLongA"<br />     .参数 hWnd, 整数型<br />     .参数 nIndex, 整数型<br /> <br /> <br /> .版本 2<br /> <br /> .子程序 窗口_设置透明, 逻辑型, 公开, 【博乐支持】成功返回真,失败返回假<br /> .参数 句柄, 整数型, , 设置透明化窗口的句柄<br /> .参数 透明度, 字节型, 可空, 设置整个窗口的透明度  取值范围是[0,255] 可空为不设定此参数<br /> .参数 透明色, 整数型, 可空, (#颜色)指定某颜色为完全透明(完全透明处不属于该窗口)  可空为不指定<br /> .参数 鼠标穿透, 逻辑型, 可空, 真:窗口被鼠标穿透<br /> .局部变量 样式, 整数型<br /> .局部变量 标志, 整数型<br /> <br /> .如果 (鼠标穿透)<br />     样式 ＝ GetWindowLongA_设置透明 (句柄, -20)<br />     样式 ＝ 位或 (样式, 32, 524288)<br />     SetWindowLongA_设置透明 (句柄, -20, 样式)<br /> .否则<br />     SetWindowLongA_设置透明 (句柄, -20, 524288)<br /> .如果结束<br /> <br /> .判断开始 (是否为空 (透明色))<br />     标志 ＝ 2<br /> .默认<br />     .如果 (是否为空 (透明度))<br />         标志 ＝ 1<br />     .否则<br />         标志 ＝ 3<br />     .如果结束<br /> <br /> .判断结束<br /> 返回 (SetLayeredWindowAttributes_设置透明 (句柄, 透明色, 透明度, 标志))

游客，如果您要查看本帖隐藏内容请回复

莫小乐

精易模块内部的
.版本 2
.子程序 窗口_置透明度, 逻辑型, 公开, 设置窗口透明状态(成功返回真,失败返回假)  
.参数 窗口句柄, 整数型, , 设置透明化窗口的句柄
.参数 透明度, 字节型, 可空, 设置整个窗口的透明度  取值范围是[0,255] 可空为不设定此参数
.参数 透明色, 整数型, 可空, (#颜色)指定某颜色为完全透明(完全透明处不属于该窗口)  可空为不指定
.参数 鼠标穿透, 逻辑型, 可空, 可空为假   真:窗口被鼠标穿透
.局部变量 临时变量, 整数型
.局部变量 临时方法, 整数型

.如果 (鼠标穿透)
    临时变量 ＝ GetWindowLongA (窗口句柄, #GWL_EXSTYLE)
    临时变量 ＝ 位或 (临时变量, 32, 524288)
    SetWindowLongA (窗口句柄, #GWL_EXSTYLE, 临时变量)  ' 设置鼠标穿透
.否则
    SetWindowLongA (窗口句柄, #GWL_EXSTYLE, 524288)
.如果结束

.判断开始 (透明色 ＝ 0)
    临时方法 ＝ 2
.默认
    .如果 (透明度 ＝ 0)
        临时方法 ＝ 1
    .否则
        临时方法 ＝ 3
    .如果结束

.判断结束
返回 (SetLayeredWindowAttributes (窗口句柄, 透明色, 透明度, 临时方法))
‘======================================================================================================’

精易模块内：窗口_渐隐渐现  我用有问题、我写了：

窗口_渐隐渐现：https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14877270  (出处: 精易论坛)

窗口_渐隐渐现  总得有透明吧！所以又写了一个窗口_置透明度、我收集整理，整理好了就复制到论坛发布了，没看到！



本帖已申请删帖！

please

感谢分享，支持开源！！！

oppp999

wh1234567

感谢分享

天籁夕阳

一个模块你能发几百贴

Destin

你可真他娘的是个人才~

如梦入秋o

这是打算把模块功能一个一个单独发帖吗

1184798949

感谢分享

微信的木头人

你批发呢？走量呢：？