【文件属性】：
文件名称：Delphi以特效方式显示图片的示例.rar
文件大小：6KB
文件格式：RAR
更新时间：2022-07-30 04:47:13
Delphi源码-图形处理
Delphi以特效方式显示图片的示例，适用的图像对象为BMP，在显示图片的时候，不是出现，而是有动画效果的渐现，不过不是淡出淡入渐现，这种效果不好表述，请下载源码自己编译测试吧。部分代码片段：
Bitmap:TBitmap;
MidX:Integer;//中间变量，当前步骤所拷贝位图的宽
RatioX:Real;//每步位图宽度增加量
I:Integer;
Rect1,Rect2:TRect;//源、目标矩形区域
Bitmap:=TBitmap.Create;
Bitmap.LoadFromFile('示例图片.bmp');//装入位图文件
RatioX:=Bitmap.Width/Step;
for I:=0 to Step do
begin
MidX:=Round(RatioX*I);
with Rect1 do //设置复制的目标区域
【文件预览】：
codesc.net
----PMobilePicture()
--------MobilePicture.ddp(51B)
--------PMobilePicture.cfg(406B)
--------MobilePicture.dfm(701B)
--------MobilePicture.pas(1KB)
--------MobilePicture.dcu(5KB)
--------PMobilePicture.res(876B)
--------PMobilePicture.dpr(213B)
--------PMobilePicture.dof(2KB)