Poner imagen en Timage desde portapapeles

[*Caro*]

Hola gabyzava, puedes hacerlo de esta forma:

Código Delphi [-]
 if Clipboard.HasFormat(CF_PICTURE) then //si es una imagen
   Image1.Picture.Assign(Clipboard);

Añade en uses la unit Clipbrd.

Saluditos

[gabyzava]

hola otra vez

Si me funciona esto:

if Clipboard.HasFormat(CF_PICTURE) then
Image1.Picture.Assign(Clipboard);

Sale bien, pero me surge otra duda

¿para poner la imagen en clipboard?,
primero necesito ponerla en un bufer virtual, es decir,
yo tomo la imagen de un archivo comprimido, y después al portapapeles,
todo esto porque no puedo asignarla directamente a image1,

espero haberme explicado.

Mil gracias