borrar dibujo en Timage usando Canvas
 

hola amigos!
bueno la cosa es que estoy haciendo un editor grafico ( muy sencillo) que ya logre que me dibuje lineas, con pincel, circulos , etc.
El problema es que quiero configurar dos botones: "Borrar Todo" y "Borrar"
el "Borrar Todo" debe borrar todo lo que haya dibujado y el "borrar" debe hacer que el pincel pinte blanco por ensima de lo que tengo pintado para que parezca que lo borra. Pero el problema es que no me sale. Alguien me puede guiar en como hacer esos dos procesos?
Muchas Gracias!!

Ha , si alguien quiere el codigo de lo que tengo hecho por que le sirve , que me lo pida y lo subo, el .pas pesa un par de kb asi que supongo que no habra problema

ha perdon, me falto aclarar que dibujo directamente sobre un timage, no cargo una imagen en blanco ni nada.

Prueba con algo como esto:

Código Delphi [-]
Image1.Canvas.FillRect(Image1.Canvas.ClipRect);

Gracias!! anda perfecto!!
lo que no puedo hacer que me salga es un efecto de "Goma de borrar", es decir, setear el pincel de forma que pinte de blanco ( que es el color del lienzo) para que de el efecto de que va borrando...
Muchas gracias!!

:confused: Algo asi:

Código Delphi [-]
Image1.Canvas.Pen.Color:= Image1.Canvas.Brush.Color;