Como Dibujar linea en Form

neg14
20 de Agosto del 2008
Quiero Dibujar una linea en un form para ello en el procedimiento FormActivate pongo:

Canvas->Pen->Widht=4;
Canvas->Brush->Color = clRed;
Canvas->Pen->Color = clBlue;
Canvas->MoveTo(100,5);
Canvas->LineTo(100,600);

No Hace nada....Alguna idea....

Gracias.

rgstuamigo
20 de Agosto del 2008
Si quieres que se dibuje la linea al aparecer el form y se vea debes poner ese mismo codigo en el evento OnPaint del form y no en el On Activate,Pruebalo SAludos....