Grafiken aus der Zwischenablage einfügen
Nach oben zu Die Zwischenablage und Grafiken
Wenn die Windows-Zwischenablage eine Bitmap-Grafik enthält, können Sie diese in jedes andere Bildobjekt einfügen, also auch in Bild-Steuerelemente und in die Oberfläche eines Formulars.
Um eine Grafik aus der Zwischenablage einzufügen, gehen Sie folgendermaßen vor:
- Rufen Sie die Methode HasFormat (VCL-Anwendungen) der Zwischenablage auf, um festzustellen, ob sie eine Grafik enthält.HasFormat ist eine Boolesche Funktion. Die Funktion gibt True zurück, wenn die Zwischenablage ein Objekt des als Parameter übergebenen Typs enthält. Um festzustellen, ob der Inhalt eine Grafik ist, übergeben Sie CF_BITMAP.
- Verknüpfen Sie die Zwischenablage mit dem Ziel.
Anmerkung: Der folgende VCL-Quelltext zeigt, wie als Reaktion auf das Anklicken von Bearbeiten > Einfügen ein Bild aus der Zwischenablage in ein Bild-Steuerelement kopiert wird:
procedure TForm1.PasteButtonClick(Sender: TObject); var Bitmap: TBitmap; begin if Clipboard.HasFormat(CF_BITMAP) then { Befindet sich ein Bild in der Zwischenablage? ) begin Image1.Picture.Bitmap.Assign(Clipboard); end; end;
void __fastcall TForm1::Paste1Click(TObject *Sender) { Graphics::TBitmap *Bitmap; if (Clipboard()->HasFormat(CF_BITMAP)){ Image1->Picture->Bitmap->Assign(Clipboard()); } }
Die Grafik in der Zwischenablage könnte aus der Anwendung selbst stammen oder aus einem anderen Programm, z.B. Microsoft Paint. In letzteren Fall braucht das Format in der Zwischenablage nicht geprüft zu werden, da der Menüeintrag für das Einfügen deaktiviert sein muss, wenn sich in der Zwischenablage kein unterstütztes Format befindet.