自绘顺序播放png图片登录器皮肤

易语言 2020-01-25 15:05:08

自绘顺序播放png图片登录器皮肤

源码借鉴了别人的作品。用了真彩模块。大家觉得好看的话,也可以拿去做别的登录器。

我这个登录器皮肤是魔域的。魔域还有好多动态登录器皮肤。。。

' 设置窗口透明度 (取窗口句柄 (), 0)
XP风格 (1)
' //////////////////// 这三句代码 使窗口透明 控件不透明
控件窗口.底色 = #黑色
SetWindowLong (控件窗口.取窗口句柄 (), -20, 位或 (GetWindowLong (控件窗口.取窗口句柄 (), -20), 524288))
SetLayeredWindowAttributes (控件窗口.取窗口句柄 (), #黑色, 200, 1)
' ' ////////////////////
载入 (_启动窗口, , 假)