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

今天小编就为大家分享一篇关于易语言将编辑框透明化的代码实例，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧

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)

									返回 (透明色)