蚂蚁爬、桌面飘雪飞舞的动态桌面软件

还有一个是3只蚂蚁在屏幕爬行 恶搞类的

一个下雪 一个蚂蚁爬 看到又下雪又蚂蚁的是我两个都开了。

窗口_创建Flash (取窗口句柄 (), 取运行目录 () ＋ “\27.swf”, 取屏幕宽度 () ＋ 10, 取屏幕高度 () ＋ 10, 0, 0)
窗口_置透明颜色 (取窗口句柄 (), #白色)
窗口_置位置和大小 (0, 0)
ws ＝ GetWindowLong (取窗口句柄 (), #GWL_EXSTYLE)
ws ＝ 位或 (ws, #WS_EX_TRANSPARENT)
ws ＝ 位或 (ws, #WS_EX_LAYERED)
SetWindowLong (取窗口句柄 (), #GWL_EXSTYLE, ws)