高速图片显示求救

Question

连续显示180张512x512 256色的图
(已经预先读到内存中的array of TBitmap[1..180]中)，
为什么第一次显示的时候非常慢，CPU占用率也非常高，等都显示了一遍以后就很流畅了？请各位指教。。急急急急急急急急急急急急急急急

Answer 1

workcanvas 在内存中画图，自己在form上重画
procedure TForm_Ball.FormPaint(Sender: TObject);
begin
  RealizePalette(backgroundCanvas.Handle);
  RealizePalette(workCanvas.Handle);
  Canvas.CopyRect(backgroundRect, workCanvas, backgroundRect);
end;