Paste "CF_JPEG"

[DeddyH]

Das stand aber auch in dem verlinkten Thread:

Zitat:

Which can be simplified by Assign()'ing the clipboard to the TPicture directly
and let it figure out the details for you:

Delphi-Quellcode:

procedure TfrmMain.DefaultImagePasteFromClipboardClick(Sender: TObject);
begin
  DefaultImage.Picture.Assign(Clipbrd);
end;

--
Remy Lebeau (TeamB)

[Bjoerk]

Hatte ich übersehen.
BTW, so macht er sogar CF_Text auf’s Bitmap. :-D