Como carregar uma imagem que esta na área de transferência?

É necessário estar declarado Clipbrd na seçã uses,
em versões unicode declare Vcl.Clipbrd.

Criar um form e coloque um TButton e o TImage.

No evento Onclick do Botão, deixe conforme o exemplo abaixo:

1
2
3
4
5

procedure TForm1.Button2Click(Sender: TObject);
begin
  if Clipboard.HasFormat(CF_BITMAP) then
    Image1.Picture.Assign(Clipboard);
end;

Esta dica se aplica para imagens bitmap (.bmp).