Ver Mensaje Individual
  #7  
Antiguo 04-06-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 26
seoane Va por buen camino
Supongo que sigues utilizando el código que pusiste antes, solo cambiaste el "if".

Pues el problema creo que esta parte del código:
Código Delphi [-]
IF letra3 = #13 THEN
BEGIN
  write (FF,'D');
  write (FF, 'O');
  write (FF, ' '); // <-- Aqui el problema
END

Cuando tienes un texto como este:
do+#13#10

Tu lo conviertes a esto:
DO+Espacio+#10

En delphi un simple #10 lo interpreta como un salto de linea, así que sigue funcionando. Pero el bloc de notas, por ejemplo, si que necesita de los dos, así que si solo encuentra un #10 en vez de cambiar de linea muestra un "cuadradito". Creo que el problema se solucionaría con algo así:
Código Delphi [-]
IF letra3 = #13 THEN
BEGIN
  write (FF,'D');
  write (FF, 'O');
  write (FF,#13); // <-- Aqui el cambio
END
Responder Con Cita