Subscribe Discuss What's new What is it

var   d:THandle;   
  begin   
      d:=getdc(panel1.Handle);   
    
      bitblt(image2.Canvas.Handle,0,0,panel1.Width,panel1.Height,d,0,0,srccopy);   
    
      ReleaseDC(panel1.Handle,d);