Nein bin mir nicht sicher....
EDIT------------------
Ok hab mal das hier versucht
Delphi-Quellcode:
procedure TForm2.Button7Click(Sender: TObject);
var
bild1:TJpegImage;
begin
SendMessage( Form2.Panel1.Handle, WM_CAP_EDIT_COPY, 1, 0 );
bild1 := TJpegImage.Create;
bild1.LoadFromClipboardFormat(cf_bitmap,ClipBoard.GetAsHandle(cf_bitmap),0);
bild1.SaveToFile('test.jpg');
end;
Leider ohne erfolg
Ich hab mir gedacht das ich das cf_bitmap in cf_jpeg ändern müsste, die geht jedoch nicht
da cf_jpeg ein undefinierter bezeichner ist.