Foros Club Delphi - Leer texto en un memo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Leer texto en un memo (https://www.clubdelphi.com/foros/showthread.php?t=722)

roman

22-05-2003 17:55:55

Leer texto en un memo

Si tengo una cadena de texto con cambios de línea insertados (#13#10) la puedo asignar a la propiedad Text de un Memo y las líneas se muestran correctamente.

Pero en mi caso en lugar de #13#10 sólo tengo #10 (como en UNIX me parece) y las líneas no se despliegan correctamente.

¿Hay alguna forma fácil de convertir los #10 en #13#10? (funciones como StringReplace no parecen servir) o bien de leer en el memo cadenas de este tipo?

Gracias \\

guillotmarc

22-05-2003 18:06:21

Hola.

¿ Esto no te funciona ?

Código:

Memo1.Text := StringReplace(Memo1.Text, chr(10), chr(13) + chr(10), [rfReplaceAll]);

Saludos

roman

22-05-2003 18:16:35

Cita:

Posteado originalmente por guillotmarc
Hola.

¿ Esto no te funciona ?

Código:

Memo1.Text := StringReplace(Memo1.Text, chr(10), chr(13) + chr(10), [rfReplaceAll]);

Saludos

¡Gracias marc!

Sí funciona, lo que no funciona bien hoy es la sinapsis de mis neuronas :( y no me di cuenta de que StringReplace es una función y no un procedimiento.

También, por si a alguien le sirve, hay una función especial para esto (no la había encontrado):

AdjustLineBreaks

// Saludos

La franja horaria es GMT +2. Ahora son las 01:59:36.