Jogar o conteúdo do TImage para a área de transferência.

Delphi

08/09/2004

alguem sabe me dizer se dá e como fazer, para jogar o conteúdo do TImage para a área de transferência do windows. Ou seja tenho várias imagens no form e quando o usuário seleciona uma eu localizo o conteudo e jogo na área de transferência para utilizar no windows através do CTRL+V!

Valeu...


Leandroamaral

Leandroamaral

Curtidas 0

Respostas

Tatuweb

Tatuweb

08/09/2004

Do TImage para a área de transferência:

  Clipboard.Assign  (Image1.Picture);

Da área de transferência para o TImage:

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


PS: Para funcionar declare ClipBrd na sessão uses do form.


GOSTEI 0
POSTAR