Utilizamos cookies propias y de terceros. [Más información sobre las cookies].
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Wiki
Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Caracteres raros #$D#$A en TListBox Delphi
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Caracteres raros #$D#$A en TListBox Delphi

Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
varios
Magnífico usuario


Registrado: Oct 10, 2006
Mensajes: 2092

Asunto: Caracteres raros #$D#$A en TListBox Delphi Responder citando

Estoy desarrollando una aplicación de contabilidad y facturación a medida para mi empresa, no tengo muchos conocimientos de programación y me han "obligado" a usar Delphi 6 por compatibilidad con otras aplicaciones de la empresa.

Tengo un TListBox donde inserto unas líneas, son ficheros a copiar, el caso es que luego uso el texto del TListBox con algo así:

Código:

listBox1.Items.Text


El caso es que hago un:

Código:

if FileExists(listBox1.Items.Text) then


Y me he dado cuenta de que no funciona porque añade al final los caracteres #$D#$A ¿cómo puedo solucionar esto? ¿qué son estos caracteres?
MensajePublicado:
Jue Nov 22, 2012 8:17 am
Top of PageVer perfil de usuario
alonsojpd
Administrador/Moderador


Registrado: Sep 16, 2003
Mensajes: 2687

Asunto: Re: Caracteres raros #$D#$A en TListBox Delphi Responder citando



Anuncios



varios escribió:
Estoy desarrollando una aplicación de contabilidad y facturación a medida para mi empresa, no tengo muchos conocimientos de programación y me han "obligado" a usar Delphi 6 por compatibilidad con otras aplicaciones de la empresa.

Tengo un TListBox donde inserto unas líneas, son ficheros a copiar, el caso es que luego uso el texto del TListBox con algo así:

Código:

listBox1.Items.Text


El caso es que hago un:

Código:

if FileExists(listBox1.Items.Text) then


Y me he dado cuenta de que no funciona porque añade al final los caracteres #$D#$A ¿cómo puedo solucionar esto? ¿qué son estos caracteres?


Esos caracteres son hexadecimal y equivalen a retorno de carro (D ó 13) y salto de línea (A ó 10). Lo que hace Items.Text es añadir un salto de línea al final de cada elemento de la lista.

Si quieres quitar esos caracteres puedes usar la función Replace, sería algo así:

Código:

  adjuntos := listBox1.Items.Text;
  //quitamos salto de línea
  adjuntos := StringReplace(adjuntos, #13#10, ' ', [rfreplaceall]);
MensajePublicado:
Jue Nov 22, 2012 9:19 am
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A