易语言将编辑框透明化的代码实例

DLL代码

.版本 2

.DLL命令 窗口_置信息_DLL, 整数型, , "SetWindowLongA", , 值

.参数 hwnd

.参数 nIndex

.参数 dwNewLong

.DLL命令 窗口_置透明度_DLL, 整数型, , "SetLayeredWindowAttributes"

.参数 hwnd

.参数 crkey

.参数 alpha, 字节型

.参数 dwflags

.DLL命令 窗口_取信息_DLL, 整数型, "user32", "GetWindowLongA"

.参数 hwnd

.参数 nIndex

编辑框透明代码

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

窗口_透明_去色 (取窗口句柄 (), #墨绿) ' 这里的“墨绿”颜色是在属性中设置的背景颜色

.子程序 窗口_透明_去色, 整数型, 公开

.参数 窗口句柄

.参数 透明色

.局部变量 风格

风格 = 窗口_取信息_DLL (窗口句柄, -20)

风格 = 位或 (风格, 524288)

窗口_置信息_DLL (窗口句柄, -20, 风格)

窗口_置透明度_DLL (窗口句柄, 透明色, 0, 1)

返回 (透明色)

运行结果:

总结

以上是 易语言将编辑框透明化的代码实例 的全部内容, 来源链接: utcz.com/z/344467.html

回到顶部