Hola gente, necesito dibujar una linea recta sobre un TImage, pero el tema esta en que no quiero modificar la imagen original..
Para ello lo que hice es lo siguiente
Tengo un TImage con la imagen y por encima de esta, tengo otro TImage vacio en donde quiero dibujar la linea recta
El objetivo es dibujar la linea y que se vea la imagen de fondo con la linea dibujada encima..
Yo hice el siguiente codigo pero no me funciona...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Image2->Picture->Bitmap->TransparentColor=clBlack;
TPoint points[2];
points[0] = Point(100,10);
points[1] = Point(10,100);
Image2->Canvas->Polyline(points,1);
}
Pero cuando ejecuto esto no dibuja nada y si comento la linea Image2->Picture->Bitmap->TransparentColor=clBlack; me dibuja un rectangulo blanco con la linea y en definitivas me tapa toda la imagen que tengo detras..
Alguna ayuda?