Ich nehme mal an, du benutzt ein Memo.
Dann:
Zitat von
Delphi Hilfe:
Mit CopyToClipboard können Sie den markierten Text in die Zwischenablage kopieren. Wenn kein Text markiert ist, wird der Inhalt der Zwischenablage nicht ersetzt. CopyToClipboard hat in diesem Fall keine Wirkung.