Win7 Aero磨砂效果模块

设置窗口的显示模式，避免截获桌面时取到自身窗口,同时解决窗口刷新问题
SetWindowLong (取窗口句柄 (), -20, 524288)
SetLayeredWindowAttributes (取窗口句柄 (), 0, 255, 2)
栅格标识 ＝ 动画框1.创建物体 (, 0, 0, , )
动画框1.置图片 (栅格标识, 读入文件 (取运行目录 () ＋ “light.png”), )
动画框1.置层次 (栅格标识, 动画框1.取层次 (背景标识) ＋ 1) ' 设置栅格图片在背景的上层
动画框1.缩放 (栅格标识, 2000, 2000) ' 调整栅格层缩放比，根据屏幕大小进行设置，这里随便给值，只要让他充满屏幕
' 输出调试文本 (动画框1.取物体宽度 (栅格标识))
窗口PNG ＝ 动画框1.创建物体 (, 0, 0, , )
动画框1.置图片 (窗口PNG, 读入文件 (取运行目录 () ＋ “a.png”), )
动画框1.置层次 (窗口PNG, 动画框1.取层次 (栅格标识) ＋ 1)
置外形图片 (读入文件 (取运行目录 () ＋ “mask.bmp”), #品红)
易语言Win7 Aero磨砂效果模块例子。