Text ausschneiden, kopieren und einfügen
Nach oben zu Mit Steuerelementen arbeiten - Index
Wenn die Unit Clipbrd in eine Anwendung eingebunden wird, können Text, Grafiken und Objekte mithilfe der Zwischenablage ausgeschnitten, kopiert und eingefügt werden. Die Eingabefelder, die die Standardtextkomponenten kapseln, verfügen über integrierte Methoden für die Zusammenarbeit mit der Zwischenablage.
Mit den Methoden CutToClipboard, CopyToClipboard und PasteFromClipboard können Sie im Quelltext auf die Zwischenablage zugreifen und Text ausschneiden, kopieren und einfügen.
Im folgenden Beispiel werden den OnClick-Ereignissen der Menübefehle Bearbeiten > Ausschneiden, Bearbeiten > Kopieren und Bearbeiten > Einfügen die entsprechenden Behandlungsroutinen zugeordnet.
procedure TEditForm.CutToClipboard(Sender: TObject);
begin
Editor.CutToClipboard;
end;
procedure TEditForm.CopyToClipboard(Sender: TObject);
begin
Editor.CopyToClipboard;
end;
procedure TEditForm.PasteFromClipboard(Sender: TObject);
begin
Editor.PasteFromClipboard;
end;
void __fastcall TMainForm::EditCutClick(TObject* Sender) {
RichEdit1->CutToClipboard();
}
void __fastcall TMainForm::EditCopyClick(TObject* Sender) {
RichEdit1->CopyToClipboard();
}
void __fastcall TMainForm::EditPasteClick(TObject* Sender) {
RichEdit1->PasteFromClipboard();
}