Скачать: CL | DM;

Остается след от BitMap при движении   Найти похожие ветки 

← →
snake-as ©   (2009-04-25 18:28) [0]

Здравствуйте. Я делаю работу с движением картинки. И на этой картинке рисуется еще одна(накладывается как второй холст). И так картинка, которая движется оставляет след на форме. Как этого избежать без очистки всего канваса? Может я что с параметрами напутал. Вот код.

   pic := TBitMap.Create;
   pic2 := TBitmap.Create;
   pic.LoadFromFile("baner.bmp");      
   pic2.Width := 200;
   pic2.Height := 200;
   pic2.Canvas.MoveTo(0, 0);
   pic2.Canvas.LineTo(100, 100);

procedure TForm1.Timer1Timer(Sender: TObject);
begin

   Canvas.CopyMode := cmSrcCopy;
   Canvas.CopyRect(dRect,pic.Canvas,sRect);
   Canvas.CopyMode := cmSrcAnd;
   Canvas.CopyRect(dRect,pic2.Canvas,pic2.Canvas.ClipRect);


Заранее спасибо за портраченное время.

---

← →
HF-Trade ©   (2009-04-25 18:55) [1]

Form1.DoubleBuffered:=True;

см. в поиске - мерцание изображения

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c