Olá galera, nesta Quick Tips, irei mostrar como carregar em um Image uma imagem que esteja no Clipboard.
Vamos da uses em Clipbrd.
Agora adicione
1 BitBtn
1 Image
No onClick do BitBtn – Ao copiarmos uma imagem pelo Windows e depois clicarmos no BitBtn veremos a imagem sendo carregada no Image.
procedure TForm6.BtnCopiarClick(Sender: TObject);
begin
if Clipboard.HasFormat(CF_BITMAP) then
Image1.Picture.Bitmap.Assign(Clipboard) ;
end;
end.
Fico por aqui ate à próxima Quick Tips.
Um abraço
Wesley Y
wyamazack@rwsolution.com.br