Problem mit Canvas

[Dein_Pate]

hallo leute...hab da so ein mehr oder weniger GROßES problem und hab auch schon auf anderen foren nachgelonzt,hab aber irgendwie nich so das richtige gefunden; Folgendes:
wollte paint nachproggen und da gibt's ja diesen gummibandeffekt,wo die linie dem mauszeiger folgt,bis man loslässt; dat ganze lautet denn ja so:

Delphi-Quellcode:

Procedure ...
  FillRect(ClientRect);
  MoveTo(X,Y)
  LineTo(Mouse.X,Mouse.Y);

so weit so gut,allerdings löcht das programm ja das alte bild,sobald ich beginne,eine neue lini zu ziehen...ich will aber,das er das alte bild behält,wenn ich anfange,eine Neue linie zu ziehen
könnte mir da jemand helfen ???