OK, es funktioniert doch nicht...
Delphi-Quellcode:
begin
Application.Initialize;
JpegImage := TJpegImage.Create;
Clipboard := TClipboard.Create;
Bitmap := TBitmap.Create;
Bitmap.Assign(Clipboard); //Bitmap wird Zwischenablage zugewiesen
JpegImage.Assign(Bitmap); //Jpeg wird Bitmap zugewiesen und somit konvertiert
Clipboard.Clear; //Zwischenablage leeren
Clipboard.Assign(JpegImage); //Jpeg in Zwischenablage schreiben
JpegImage.Free;
ClipBoard.Free;
Bitmap.Free;
Application.Run;
end.
Ist das so ok? Es funktioniert nicht. Danach ist nämlich wieder ein Bitmap in der Zwischenablage...
Bin für jeden Hinweis dankbar.
Grüße, Faux.
Faux Manuel
Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.
GoTrillian