[NEG1414]

Buenas..

Siento ser tan pesado pero no doy hecho que se reponga la imagen del trozo de componente que deseo... la verdad es que dibuja el area totalmente blanca...

Dado que la todas las operaciones las hago desde el propio componente (por si sirve de algo lo que se va ha visiualizar en el componente lo dibujo mediante el metodo paint() usandola la propiedad canvas) lo he dadptado asi:

 
 
class PACKAGE TGrafica : public TCustomControl
{
  __published: // IDE-managed Components  
 
   TPanel *PanelInf;
   Graphics::TBitmap *AreaPanelInf;
   TControlCanvas    *FCtrlCanvas; 
 
   int PPx; //Posicion X esquina superior Derecha Panel Informacion
   int PPy; //Posicion Y esquina superior Derecha Panel Informacion
 
    .................
 
 
void TGrafica::MostrarPanelDatos()
{
 
   AreaPanelInf->Width   = 16;
   AreaPanelInf->Height  = 10;
 
   TRect R = Rect(PPx,PPy,AreaPanelInf->Width,AreaPanelInf->Height);
   AreaPanelInf->Canvas->CopyRect(R, Canvas, R);
 
   //Creo y visualizo Panel Informacion
   PanelInf = new TPanel (this);
   PanelInf->Parent  =    this;
   PanelInf->Height  = 10;
   PanelInf->Width   = 16;
   PanelInf->Left = PPx;
   PanelInf->Top  = PPy;
   PanelInf->Visible = true;
 
   Application->ProcessMessages();
 
}
 
 
//---------------------------------------------------------------------------
//Restaura que ocupada el Panel Informativo
 
void TGrafica::RestaurAreaPanel()
{
 
  PanelInf->Visible = false;
 
  this->Canvas->Draw(PPx,PPy,AreaPanelInf);
 
  Application->ProcessMessages();
}

Alguna idea... Gracias