Hola y gracias por tu ayuda. He intentado hacer como me dices pero me sale un error:"la imagen no es válida".
Intenté con este código:
ImagenOculta.PaintPicture Imagen.Picture, 0, 0
se entiende que quiero pasar lo que hay en imagen hacia imagen oculta.
Por favor me puedes decir en que estoy fallando.