Clipboard.AsText := MeinString;
So?
Oder eine Methode schreiben, die einen String schreibt:
Delphi-Quellcode:
procedure SaveStringToFile(
const s:
string;
const fn: TFileName;
const Encoding: TEncoding;
const BOM: Boolean);
var
ss: TStringStream;
begin
ss := TStringStream.Create(IfThen(BOM
and not Encoding.IsSingleByte, #$FEFF) + s, Encoding, False);
// BOM nicht bei SingleByteEncodings (das ist alles außer ASCII und Default)
try
ss.SaveToFile(fn);
finally
ss.Free;
end;
end;