TPaintbox auf Canvas zeichnen mit "Vorschau"

[draeger1980]

Hi,

ich hätte da mal eine frage:

Wie kann man auf in auf der TPaintbox im Canvas zeichnen und dabei gleichzeit das ergebnis ansehen ?

D.h. wenn ich eine Linie vom Punkt X,Y nach X,Y ziehe dann erscheint die erst im MouseUp ereignis.

Quellcode:

Quellcode vom MouseDown ereignis:

begin
PaintBox1.Canvas.Moveto(X,Y);
end;

Quellcode vom MouseUp ereignis:

begin
PaintBox1.Canvas.Lineto(X,Y);
end;

Kennt jemand die Lösung ? Vieleicht auch eine die gleich bei Rect, RoundRect und Ellipse funzt ?