Kann sein, das StringReplace die Steuerzeichen einfach ausläßt (böse Falle...). Ok, dann halt per Fußmarsch durch den Dschungel
Delphi-Quellcode:
tmptext := Memo.lines.text;
for i:= 1 to length(tmptext) do
begin
if (Ord(tmptext[i]) < 20) or (Ord(tmptext[i]) > 160 ) then tmptext[i] := ' '; // Steuer- zu Leerzeichen
end;
Memo.lines.text := tmptext;
Grüße // Martin