Große Strings im Debugger

[Redeemer]

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;