Se borra lo dibujado en el canvas, como evitarlo?

[[Gunman]]

Muchas gracias, no habia leído estos mensajes y si los hubiese leído me podrian haber evitado tiempo y otro hilo que abrí ayer.
Muchas gracias y perdón!

[Diavlo]

Por casualidad pase por este hilo y es lo q andaba buscando, solo unas dos cositas mas.
Primero: como cambio el color del fondo del TImage, dibujo unas lineas o cualquier cosa y me sale con fondo blanco.
Segundo: Como se borra todo lo q he dibujado, lo q estoy haciendo es el metodo grafico para problemas de programacion lineal, hasta ahora mi programa grafica solo rectas, pero cuando quiero graficar otras rectas las rectas anteriores sigeun ahi y yo quiero borrarlas.

[Neftali [Germán.Estévez]]

El color de fondo deberías poder cambiarlo con:

Código Delphi [-]
...  Canvas.Brush.>Color := clRed;

[Diavlo]

Probe con el siguiente codigo:

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

Y el fondo sigue siendo blanco, no puedo cambiarle el color de fondo al TIamge.

[[seoane]]

Cambiar el color de fondo solo afecta a las operaciones de dibujo posteriores al cambio. Me explico, si cambias el color a negro luego tienes que borrar todo el canvas para que este se cubra de negro:

Código Delphi [-]
  Image1.Canvas.Brush.Color := clBlack;
  Image1.Canvas.FillRect(Image1.Canvas.ClipRect);