Hi

I'm getting an awful lot of screen flicker from the following code:
============== snip ========================
      Form1.Image1.Canvas.Pen.Color:=$FFFFFF;
      Form1.Image1.Canvas.Pen.Mode:=pmNot;
      Form1.Image1.Canvas.MoveTo(iCornerX,CornerY);
      Form1.Image1.Canvas.LineTo(PrevX,PrevY);
      Form1.Image1.Canvas.MoveTo(iCornerX,CornerY);
      Form1.Image1.Canvas.LineTo(X,Y);
============== snip ========================
It's actually rubberbanding showing where a line will be drawn.

Is there a way of reducing this? The background colour of the TImage is
black which tends to accentuate it somewhat.

--


There are good tutorials/examples on
http://wiki.lazarus.freepascal.org/Developing_with_Graphics

Gustavo

Reply via email to