TImage Paint To mehrmals aufrufen

[bitsetter]

Hi,

mit Invalidate ging es bei mir.

Delphi-Quellcode:

  
  image1.Invalidate;
  case ComboBox1.ItemIndex of
  0 : Panel1.PaintTo(Image1.Canvas,0,0);
  1 : Panel2.PaintTo(Image1.Canvas,0,0);
  2 : Panel3.PaintTo(Image1.Canvas,0,0);
  end;