Hallo,
das Kopieren in die Zwischenablage kannst du schneller und einfacher verhindern:
Delphi-Quellcode:
procedure TDemoForm.RichEditSelectionChange(Sender: TObject);
begin
with Sender as TRichEdit do
SelLength := 0;
end;
Das Einfügen aus der Zwischenablage ist unmöglich, wenn ReadOnly = True gesetzt ist. Um Screen-Shots zu verhindern musst du wohl etwas mehr Aufwand treiben.
Grüße vom marabu