Durchgehend zeichnen mit canvas

[Dragon27]

Hallo,

Also schaut der Text jetzt aus. aber der macht bei schnellem Zeichnen hald einfach nicht eine solche Linie

__________________________________________________ __________

sondern:

.................................................. ..........

Also sie is einfach gepunktet wenn man zu schnell zeichntet.

Hier noch der code:

Delphi-Quellcode:

if zeichnet=true
then begin
 zeichenbrett.Canvas.Font.Color:=JvGammaPanel1.ForegroundColor;
if toolbutton1.Down
then begin
zeichenbrett.Canvas.Pixels[x,y]:=JvGammaPanel1.ForegroundColor;
end;

Wie würdet Ihr denn so ne zeichenroutine machen?

Zeichnet stellt sich bei mousedown auf true....


Danke

Andy