使用易语言制作win7任务栏透明化设置工具

Win7的半透明化效果看起来非常炫酷，并且可以自由调节窗口的透明度。现在，我们可以使用易语言来制作一个工具来调节Win7任务栏的透明程度。

1. 创建易语言窗口程序

首先，新建一个易语言的Windows窗口程序。然后，在dll命令下插入以下几个dll命令：FindWindowA、SetWindowLongA和SetLayeredWindowAttributes。如果对这些API不熟悉，可以查阅相关资料。

2. 添加组件

在窗口中添加滑块条、按键、时钟、两个标签和一个图片框等组件。其中，图片框是为了美化界面，可以选择性地添加。

3. 调整组件参数

适当调整各组件的参数。特别是滑块条的参数，可以根据下图所示进行设置。时钟的周期设置为500毫秒，这样界面就基本完成了。

4. 添加程序集变量

添加两个程序集变量，一个是滑块的位置，另一个是窗口的句柄。滑块位置定义为整数型。

5. 滑块位置改变事件

在滑块位置改变的事件中，添加一下代码：

SetWindowLongA(句柄, -20, GetWindowLongA(句柄, -20) or $80000)
SetLayeredWindowAttributes(句柄, 0, 滑块位置 * 255 div 100, 2)

6. 时钟周期事件

在时钟周期事件中，添加以下代码：

if 滑块位置 gt; 0 then
    SetLayeredWindowAttributes(句柄, 0, 滑块位置 * 255 div 100, 2)

7. 按键被按下事件

在按键被按下事件中，添加以下代码：

if 滑块位置 gt; 0 then
    SetWindowLongA(句柄, -20, GetWindowLongA(句柄, -20) and not $80000)

8. 查看效果

现在，你可以运行程序并调节滑块的位置来实时查看任务栏的透明效果。

补充初始值

因为初始化时滑块位置的值为零，所以一开始运行程序，任务栏会完全透明化。为了避免这个问题，可以在窗口初始化时添加一个滑块位置的初始值。

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。