Color de línea y restablecer valores

[Lizeth]

Hola, espero alguien me pueda ayudar, tengo dos problemitas.
1. Quiero cambiar el color de una linea de gris a negro, simplemente presionando un boton, no quiero una paleta de colores, solo que en un evento OnClick me cambie el color de la linea, lo he intentado con :

PaintBox1.Canvas.Pen.Color:= clBlack;
PaintBox1.Canvas.LineTo(63,0);

Pero no me cambia el color a negro, lo deja en gris.

y 2. Al minimizar la pantalla se borra todo lo que he dibujado, se que el dibujo es temporal pero no se como hacer que siempre este presente, probe en el OnActive de la forma pero no lo hace.

Muchas gracias espero alguien me ayude.

MLTH