In der Zwischenablage scheint leer zu sein, da wenn ich in einem txt Dokument Einfügen klicke, wird nichts eingefügt.
Mmmhja, das ist nur ein oberfächlicher Test. Schau mal im Debugger, was im .AsText und im Formats[0]... drinsteht. Könnte ein Inhalt sein, der in einem Format vorliegt, das sich nicht einfügen lässt.
Ich hatte das Phänomen einmal und die praktikabelste Lösung was damals, den kompletten Text in einem TMemo programmatisch zu selektieren und .CopyToClipboard aufzurufen. Danach war im Clipboard alles ok.
Es könnte auch hilfreich sein, das Clipboard zu sperren:
Delphi-Quellcode:
Clipboard.Open;
Clipboard.Clear;
Clipboard.AsText := 'blah';
Clipboard.Close;