Metafile per Clipboard einlesen

[Martin Vieregg]

Hallo,

ich schreibe derzeit eine Form, mit der der Benutzer entweder über die Zwischenablage oder über das Einlesen einer Datei eine Grafik lädt. Image1.Picture.LoadFromFile funktioniert mit Metadateien (Dateiendung EMF) einwandfrei, während Image1.Picture.Metafile.LoadFromClipboardFormat(cf _MetafilePict, ClipBoard.GetAsHandle(cf_MetafilePict), 0)
bzw. Image1.Picture.LoadFromClipboardFormat zur Laufzeit immer zu einem "unsupported clipboard format" error führt. Clipboard.HasFormat (cf_MetafilePict) ist aber TRUE. Wenn man von Excel eine Säulengrafik in die Zwischenablage legt oder von CorelDraw eine Vektorgraphik, sollte dies ja eigentlich ein einwandfreies enhanced Metafile sein.

Metafile.Enhanced habe ich mit TRUE (EMF-Dateiformat) und mit FALSE (WMF-Dateiformat) ausprobiert, beides ohne Wirkung. Mit Bitmaps gibt es gar keine Probleme. Möglicherweise fehlt ja nur eine Kleinigkeit. Was habe ich falsch gemacht?

Martin Vieregg

[Martin Vieregg]

So, jetzt habe ich die Lösung selbst herausgefunden:

Während Metafile.LoadFromClipboard nicht funktioniert, geht
Metafile.Assign (Clipboard) einwandfrei! Scheint ein Bug in Delphi zu sein. Bei allen anderen Datentypen (Text, Bitmap) geht LoadFromClipboard dagegen schon. Merkwürdig.

Martin Vieregg