【文件属性】:
文件名称:Delphi下雪动画特效.rar
文件大小:3KB
文件格式:RAR
更新时间:2022-07-30 04:50:04
Delphi源码-图形处理
Delphi下雪动画特效,一个十分漂亮的下雪场景动画,雪花飘落在屏幕的窗口上面,窗口听状态栏、标题栏都会落满雪花,看上去很气派。参数设置:
Point: TPoint; // 雪点位置
Color: Integer; // 先前颜色
Speed: Integer; // 下落速率
nMove: Integer; // 下落距离
Stick: Integer; // '粘连'度
SnowNodes: array[0..SnowNumber] of SnowNode; // 雪点数组
hTimer: Integer; // '随机风向'时钟句柄
CrWind: Integer; // 当前'风向' ( -1 ~ 1 )
CrStep: Integer; // 当前循环步数(用于限速)
ScreenWidth, ScreenHeight: Integer; // 屏幕尺寸
【文件预览】:
codesc.net
----SnowFall()
--------Clear.bat(75B)
--------Readme.txt(90B)
--------LiuMazi.txt(26B)
--------LiuMazi.res(872B)
--------SnowFall.dpr(5KB)
--------LiuMazi.ico(766B)