FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Eliminar salto de linea de TStrings
Hola,
estoy desarrollando un programa simple en el cual incluye una funcion para pasar un TStrings a un memo, el problema es que siempre hace el salto de linea, llevo 3 dias en esto, ya intente esto clubdelphi.com/foros/showthread.php?t=21324 no funciona, lo he modificado de varias maneras, me dice "Acess Violation" pero nada, uso XE3 mi programa es en Firemonkey. gracias por responder. |
#2
|
|||
|
|||
Estimado sería tan amable de escribir algo de código para intentar visualizar cual sería su problema...Como dice alguien por aquí "La bola de cristal esta fallando..."
|
#3
|
|||
|
|||
lo siento mi conexion a internet no es muy buena,
como dije antes me dice Invalid Pointer o Acess Violation, esto me tiene de algo impotente, pues es algo simple lo se, pero a mi no me funciona, por algo que quiza no eh visto. lo que hago es buscar archivos y luego guardar el resultado, funciona perfecto, pero al pasar el memo siempre salta de linea. aqui utilizo esto clubdelphi.com/foros/showthread.php?t=21324 este me dice Acess Violation var:Listado2:TStrings; lista3:TStrings; begin lista:= TStringList.Create; Listado2:= TStringList.Create; BuscarArchivos4(carpeta, '*.exe', faAnyFile, lista3); Listado2:=lista3; //aqui hago el preceso segun el ejemplo anterior lista4.free; Listado2.free; despues use este pero tampoco me funciona clubdelphi.com/foros/showthread.php?t=84303 tambien use este {:Elimina los saltos de línea de un TStrings. Elimina los saltos de línea (caracteres #10 y #13; salto de linea y salto de carro) de un TStrings. @param Strs TStrings del que se desean eliminar los caracteres @param CharReplace Caracter a sustituir } function QuitarSaltosLinea(Strs: TStrings; CharReplace:String=STR_EMPTY):String; var Str:string; begin Str := AnsiReplaceStr(Strs.Text, #10, CharReplace); Result := AnsiReplaceStr(Str, #13, CharReplace); end; y hasta el mas simple ShowMessage(TStringsToString(Listado2)); todos me dice acces violation o invalid pointer. en otras ocasione me muestra el memo en blanco, lleno de lineas pero en blanco "si tienes la bola de cristal pásamela por favor, así no quiebro el cerebro" jejeej |
#4
|
|||
|
|||
Amigo
|
#5
|
||||
|
||||
elmago00,
Cita:
El código anterior permite pasar la información de un TStrings a un TMemo. Espero sea útil Nelson. |
#6
|
|||
|
|||
cloayza
tu codigo funciona bien en ShowMessage, pero al pasarlo al memo, lo muestra en blanco, esta lleno pero en blanco, lo pase a una varable string, y lo guarde a un .txt y lo muestra en blanco, pero lleno. estoy probando el tuyo ahora [nlsgarcia] por cierto los archivos a leer son 2000 y el nombre de cada uno tiene 10 letras, por lo que no se si el problema sea ese, pues son 20000 caracteres. veo que solo guarda y muestra hasta 5000 caracteres, cuando leo mas los muestra lleno y en blanco a la vez, esto me rompe la cabeza. es la primera vez que veo esto asi. no es mi memoria, pues hice uno en vb.net y otro en java y funcionan bien leen 350000 lineas |
#7
|
|||
|
|||
[nlsgarcia]
acabo de probar el tuyo y sigue igual, en el showmesage con salto de linea funciona pero al memo, lo muestra repleto pero en blanco. y siempre hace salto de linea esto me tiene desesperado ya. son 13 horas al dia pegado al computador, y no le veo por donde. solo los puedo hacer mostrar en el memo o variables con salto de linea. auxilio. gracias a los dos por sus respuestas |
#8
|
|||
|
|||
señores anuncio mi futuro retiro. no puede ser que no le encuentre solución a esto de "variable llena pero en blanco"
como desarrollador es la primera vez que me veo tan impotente. en fin creo que alguna vez se pierde, saludos a todos y gracias por haberme ayudado. |
#9
|
||||
|
||||
elmago00,
Cita:
Pregunto: 1- ¿Esto es lo que requiere tu programa? 2- De no ser así, ¿Puedes detallar con un ejemplo como quieres que quede formateada la información? Espero sea útil Nelson. |
#10
|
|||
|
|||
Cita:
Incluye el código completo para ver que hay... Saludos... |
#11
|
||||
|
||||
elmago00,
Cita:
Cita:
El código anterior permite pasar la información de un TStrings a un TMemo en Delphi XE4 con FireMonkey HD en una máquina virtual VMWare con Windows 7 Professional x32, como se indica en la siguiente imagen: Espero sea útil Nelson. |
#12
|
|||
|
|||
aqui el codigo fuente un simple ejemplo
prueba.rar |
#13
|
|||
|
|||
recuerden quiero eliminar el salto de linea, pero soporte gran cantidad de nombre de archivos por ejemplo 20000 nombres, siempre solo puedo ver todo el valor de la variable pero son salto, y eso es lo que no quiero.
|
#14
|
||||
|
||||
elmago00,
Cita:
Espero sea útil Nelson. |
#15
|
|||
|
|||
quiero el directorio mas el nombre del archivo. asi como aparece en la lista, pero sin el salto de linea,funciona perfecto con 825 direcciones de archivos, pero no puedo leer mas de eso, si lo hago aparece todo en blanco y quiero leer 5000 cadenas.
|
#16
|
||||
|
||||
Hola elmago00.
Creo que nlsgarcia se refiere a como deseas la salida en el memo, si es: Código:
C:\Windows\System32\tasklist.exe C:\Windows\System32\Taskmgr.exe ... Código:
C:\Windows\System32\tasklist.exeC:\Windows\System32\Taskmgr.exe ... Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#17
|
|||
|
|||
tal como tu lo pones en el segundo ejemplo, eliminar todos los saltos de linea y en lugar de hacer el salto que aparezca un espacio entre ellos. eso lo consigo pero repito solo 825 direcciones de ficheros, mas no puedo pues en el memo me aparece en blanco, al igual que cualquier variable a donde deseo enviar la información. solo funciona bien en showmessage, 5000 diferentes direcciones sin salto de linea, pero no lo asi, sino que en el memo.
Última edición por elmago00 fecha: 19-11-2013 a las 00:05:43. |
#18
|
||||
|
||||
elmago00,
Cita:
Cita:
Revisa este código: El código anterior elimina los caracteres de CR y LF de los strings contenidos en un TString y los sustituye por un espacio en blanco, asignando la salida resultante a un TMemo, como se muestra en la siguiente imagen: Espero sea útil Nelson. Última edición por nlsgarcia fecha: 19-11-2013 a las 00:24:04. |
#19
|
||||
|
||||
Cita:
Entonces proba de este modo:
Ejemplo de uso:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#20
|
||||
|
||||
elmago00,
Continuación del Msg #18: La correcta definición de la función RemoveCRLF es la siguiente: Espero sea útil Nelson. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Eliminar cadena con salto de linea | Miguel89 | Varios | 3 | 25-04-2011 01:20:20 |
Parsear caracter una linea desde TStrings.... | namtaxonlabs | Varios | 0 | 07-12-2010 20:01:51 |
Eliminar los "saltos de línea" de un TStrings.Text | Neftali [Germán.Estévez] | Trucos | 0 | 08-06-2006 16:57:56 |
Eliminar salto de linea de una cadena | pablomg8 | Varios | 2 | 13-05-2005 15:35:44 |
salto de linea | bolofe | Varios | 2 | 24-04-2005 17:30:19 |
|