topic-6061

Posts: 1816

Joined: Wed Oct 26, 2005 02:49 PM

Detectar Tabs en Archivos Planos
Posted: Wed Feb 21, 2007 05:05 PM

Amigos del foro como dice el encabezado... como detecto si existe un tab dentro de un archivo plano? Que char(?) es?

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

jacgsoft

Posts: 114

Joined: Fri Nov 24, 2006 09:03 PM

Detectar Tabs en Archivos Planos
Posted: Wed Feb 21, 2007 05:27 PM

El codigo del TAB es CHR(9)

Jaime

R.F.

Posts: 840

Joined: Thu Oct 13, 2005 07:05 PM

Detectar Tabs en Archivos Planos
Posted: Wed Feb 21, 2007 09:38 PM

en un texto no lo vas poder visualizar como CHR(9) lo recomendable es que abras el archivo con FOPEN() y leas byte por byte, así si podrás reconocer el TAB

Saludos

R.F.

Rochinha

Posts: 310

Joined: Sun Jan 08, 2006 10:09 PM

Detectar Tabs en Archivos Planos
Posted: Thu Feb 22, 2007 01:13 PM

Use memoread primero:

Code: Select all Collapse

...
cLinha := memoread( "archivo.txt" )
...

Localize

Code: Select all Collapse

...
if AT( cLinha, chr(9) ) > 0
   ? "Existe TABs en archivo"   
endif
...

Reemplaze el CHR(9)TABs por CHR(44) COMA con StrTran()

Code: Select all Collapse

...
cLinha := StrTran( cLinha, chr(9), chr(44) )
...

Use APPEND FROM ... DELIMITED WITH "," para una tabla.

@braços :?)
fivolution@hotmail.com
http://www.5VOLUTION.com.br

leandro

Posts: 1816

Joined: Wed Oct 26, 2005 02:49 PM

De muchas gracias...
Posted: Thu Feb 22, 2007 03:54 PM

Rochinha... Mas que solucionado...

Muchas Gracias

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

FiveTech Support Forums

Continue the discussion