Foros Club Delphi - seleccionar imagen

Hola, tengo el código para seleccionar una imagen, pero la selecciono con un fondo blanco perfilado en negro, y quiero hacer que la selección sea transparente para que se vea la imagen entera y no con algo blanco en el medio... y también además de poder copiar, pegar y cortar esa selección, quiero también darle opciones como que me cambie de color, pero no se cómo hacerlo tampoco...

Os pongo el código que uso en la selección, a ver si me podéis ayudar:

Código:

void __fastcall TForm1::Seleccionar(TObject *Sender) //seleccionar

//un trozo d imagen

{

  seleccion=true;



}

//------------------------------------------------------------------------



void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,

      TShiftState Shift, int X, int Y)

{

  if(seleccion==true){

   pintando=true;

   Imagen->Canvas->MoveTo(X,Y);

   origen.x=X;

   origen.y=Y;

   }

 }

//------------------------------------------------------------------------

 



 void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,

  int X, int Y)

  {

    if(seleccion==true){

      Imagen->Canvas->MoveTo(origen.x, origen.y);

      Imagen->Canvas->MoveTo(origen.x, origen.y);

      Imagen->Canvas->Rectangle(origen.x, origen.y, X,Y);

      destino=Rect(0,0,300,300);

      Imagen->Canvas->CopyRect(destino, Imagen->Canvas, destino);

      dest=destino;

      ini=X;

     fin=Y;

   

   }

}

//------------------------------------------------------------------------------------------------

void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,

   TShiftState Shift, int X, int Y)

{

     if(seleccion==true){

   Imagen->Canvas->MoveTo(X,Y);

   pintando=false;

  }

}