ayuda con un salto de línea que no me funciona!!! por favor!!!

[Neftali [Germán.Estévez]]

rojo, prueba a utilizar la etiqueta [ DELPHI ] en lugar de la etiqueta [ CODE ].

[yusnerqui]

Tienes razón seoane, jejeje, parese que ayer no era mi día.

Ahora quiero preguntar, es necesario hacer esta rutina? Es que no cambia de línea el memo automáticamente cuando encuentra uno de los mencionados caracteres? No debería ser ese el comportamiento normal del memo?

Saludos.

[[seoane]]

Empezado por yusnerqui

Ahora quiero preguntar, es necesario hacer esta rutina? Es que no cambia de línea el memo automáticamente cuando encuentra uno de los mencionados caracteres? No debería ser ese el comportamiento normal del memo?

Pues si, lo malo es que añade un salto de linea cada vez que encuentra un #13#10, un #13 o un #10. Si estamos tratando con un texto guardado en un archivo no hay problema, el ajustara los saltos de linea automáticamente. Pero si estamos haciendo un transmisión y el emisor manda 'hola'+#13#10 y nosotros lo recibimos partido, 'hola'#13 primero y luego #10 se insertaran dos saltos de linea cuando solo debería de haber uno. Ahora bien, podemos hacer algo como esto:

Código Delphi [-]
var
  temp: String;
  n:integer;
begin
  comport1.ReadStr(temp,count);
  for n := 1 to Length(temp) do
    if temp[n]<>#10 then  
      memo1.Text:=memo1.Text+temp[i];
end;

O incluso como esto:

Código Delphi [-]
var
  temp: String;
begin
  comport1.ReadStr(temp,count);
  temp:= StringReplace(temp,#10,'',[rfReplaceAll]);
  memo1.Text:=memo1.Text + temp;
end;

En ambos casos nos deshacemos de los #10 y dejamos todo el trabajo a los #13. El propio memo se encargara de ajustar los saltos de linea cada vez que encuentre un #13 en el texto.

[yusnerqui]

Bueno al parecer en este caso no nos lo dan picado verdad, pues al parecer en temp ya se leyó el contenido de lo que vamos a mostrar en el memo.

Por otra parte te comento que el memo solo cambia de línea con la secuencia #13#10, en caso de omitir alguno de estos dos solo mostrará un símbolo.

De todos modos sería útil que quien inició este hilo se reportara para ver en que ha terminado el problema en cuestión.

Saludos.

[[seoane]]

Hola yusnerqui,

Empezado por yusnerqui

Bueno al parecer en este caso no nos lo dan picado verdad, pues al parecer en temp ya se leyó el contenido de lo que vamos a mostrar en el memo.

Mas bien parece que el procedimiento mostrado es llamado varias veces sucesivamente según van llegando los datos, y los datos en una transmisión tienen la mala costumbre de llegar como les da la gana y no como a nosotros nos gustaría. Pero como se realiza la transmisión solo lo sabe rojo

Empezado por yusnerqui

Por otra parte te comento que el memo solo cambia de línea con la secuencia #13#10, en caso de omitir alguno de estos dos solo mostrará un símbolo.

¿Eso lo comprobaste? porque si yo hago esto:

Código Delphi [-]
Memo1.Lines.Text:= 'Uno'+#13#10+'Dos'+#13#10+'Tres';

// O esto otro
Memo1.Lines.Text:= 'Uno'+#13+'Dos'+#13+'Tres';

// Incluso esto
Memo1.Lines.Text:= 'Uno'+#10+'Dos'+#10+'Tres';

El resultado siempre es el mismo, 3 lineas de texto en el memo. Es mas si revisamos el valor de Memo1.Lines.Text veremos que en los últimos 2 casos se han añadido de forma automática el #10 o el #13 donde era necesario.

[yusnerqui]

Hola, pues creo que es hora de hablar de nuestras versiones de delphi y preguntar como se comportan en los diferentes casos, porque el memo estandar que viene con mi delphi 7 solo cambia de línea con la mencionada secuencia.

Incluso si le pasas un texto que termine en #13 y luego uno que comience en #10 se agrega pasa lo siguiente:
El primer texto queda en laprimera línea terminado por un símbolo, algo como "|".
Al agregarle el segundo trozo de texto el símbolo desaparece y se agrega una nueva línea con el contenido de este último.

Realmente no se a que se debe esta diferencia de comportamiento.

Bueno me acabo de dar cuenta de algo, tú pones Memo1.Line.text, prueba hacerlo con Memo1.text que es como yo hice mis pruebas, estoy seguro que obtendrás mi mismo resultado.

Saludos.

[[seoane]]

Tienes razón, si utilizo la propiedad Text del memo el resultado es diferente. Si te digo la verdad nunca he utilizado antes esa propiedad, siempre utilizo la propiedad Text, de la propiedad Lines. Siempre que tengo que manejar el texto del memo, sea cargarlo desde un archivo, guardarlo, modificar sus lineas o su texto lo he hecho desde la propiedad Lines. El caso es que aunque tengan el mismo nombre son propiedades muy diferentes, de ahí que se comporten de diferente manera y de ahí mi confusión.