图片双缓冲

在窗口显示图片的时候, 有时候会出现卡顿, 为了让图片更换显示的更为流畅,  我们用一种缓冲的方式来显示 下面是Delphi代码:

声明一个 FBmp: TBitmap 变量

窗口初始化的时候

FBmp := TBitmap.Create;

FBmp.SetSize(Image1.Width, Image1.Height);

在定时器中开始绘画 主窗口中有3个 image控件

先画背景图片 image1

  FBmp.Canvas.Draw(0, 0, Image1.Picture.Graphic);


  if Self.Tag = 0 then
   begin
     FBmp.Canvas.Draw(67, 291, Image2.Picture.Graphic);
 //    FBmp.Canvas.Draw(0, 200, Image1.Picture.Graphic);
 //    FBmp.Canvas.TextOut(10, 40, '鹅鹅鹅鹅鹅鹅饿鹅鹅');
  end
  else
  begin
        FBmp.Canvas.Draw(67, 291, Image3.Picture.Graphic);
//    FBmp.Canvas.TextOut(10, 40, '啊啊啊啊啊啊啊啊啊');
  end;


  Self.Canvas.Draw(0, 0, FBmp);