Delphi以特效方式显示图片的示例.rar

Delphi以特效方式显示图片的示例，适用的图像对象为BMP，在显示图片的时候，不是出现，而是有动画效果的渐现，不过不是淡出淡入渐现，这种效果不好表述，请下载源码自己编译测试吧。部分代码片段： 　　Bitmap:TBitmap; 　　MidX:Integer;//中间变量，当前步骤所拷贝位图的宽 　　RatioX:Real;//每步位图宽度增加量 　　I:Integer; 　　Rect1,Rect2:TRect;//源、目标矩形区域 　　Bitmap:=TBitmap.Create; 　　Bitmap.LoadFromFile('示例图片.bmp');//装入位图文件 　　Ra