Problema con salto de linea, ayuda please!

[[seoane]]

Me parece que no me explique bien, cuando dije que el salto de linea, en windows, se correspondía con los caracteres #13 y #10, me refería a que el salto de linea se representa por los dos juntos, primero el #13 y luego el #10.

Es decir:

Texto+#13+#10

Así que deberías de usar algo así, ya que el #13 es el primer carácter de los dos en aparecer:

Código Delphi [-]
IF letra3 = #13 THEN

De todas formas, ir leyendo letra a letra se me hace un método poco eficiente. Porque no pruebas con algo así, donde Str es una variable de tipo String:

Código Delphi [-]
  while not Eof(F) do
  begin
    Readln(F,Str);
    if Copy(Str,Length(Str)-1,2) = 'do' then
      Writeln(FF,Copy(Str,1,Length(Str)-2) + 'DO')
    else
      Writeln(FF,Str);
  end;