请教,如何显示bmp动画(既一幅bmp里有多帧)

ysx_5 2008-05-13 11:15:14
RT

请指点,谢谢 :)
...全文
212 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
ysx_5 2008-05-14
  • 打赏
  • 举报
回复
加了个timer,解决了
另bmp图的背景是黑色的,不知如何设置为透明,继续学习 :)
感谢
shuihan20e 2008-05-13
  • 打赏
  • 举报
回复
没用过,学习了
天行归来 2008-05-13
  • 打赏
  • 举报
回复
载入bmp后,对bmp分段显示就可以。
var
Bitmap: TBitmap;
MyRect, MyOther: TRect;
begin

MyRect := Rect(10,10,100,100);

MyOther := Rect(10,111,100, 201);
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile('c:\windows\tartan.bmp');
Form1.Canvas.BrushCopy(MyRect, Bitmap, MyRect, clBlack);
Form1.Canvas.CopyRect(MyOther,Bitmap.Canvas,MyRect);
Bitmap.Free;
end;

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi GAME,图形处理/多媒体
社区管理员
  • GAME,图形处理/多媒体社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧