Ich kenne als Verursacher, word und Wordpad aber es gibt da bestimmt noch ein paar andere.
ersetz doch jedes alleine stehendes #10 durch #13#10 und fertig.
Delphi-Quellcode:
for i:=length(mytext) down to 1 do
if mytext[i]=#10 then
if (i>1) and (mytext[i-1]<>#13) then
insert(#13,mytext,i)
else
if i=1 then
insert(#13,mytext,i) ;
Nich soo der Bringer aber wohl schneller als Ansireplace...
Gruß
K-H