FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como Separar lineas en Archivo TXT SOLUCIONADO
Posts: 230
Joined: Thu Sep 17, 2015 11:40 PM
Como Separar lineas en Archivo TXT SOLUCIONADO
Posted: Sun Sep 24, 2023 11:17 PM

Hola, se necesita separar por líneas un archivo txt las líneas no son del mismo tamaño y por separador de línea tiene LF

alguna sugerencia.

2023/05/11||03|B001|945||1|21812734|RAMIREZ BENGOLEA DE VASQUEZ MARILUZ|0|14.41|0|2.59|0|0|0|0|0|0|0|0|17|PEN|1.000|||||||1|0|0|0101|||2053460194903B0010000000945

Carlos Atuncar - CaSoftSystem
Chincha - PerĂș
+51983478218
carlosalbatun@gmail.com
Posts: 230
Joined: Thu Sep 17, 2015 11:40 PM
Re: Como Separar lineas en Archivo TXT SOLUCIONADO
Posted: Mon Sep 25, 2023 12:01 AM

Gracias le encontre la solucion

aLines := hb_ATokens( MemoRead( xFile ), Chr(10))

For a:=1 To Len( aLines )

   ?aLines[a]

Next

Carlos Atuncar - CaSoftSystem
Chincha - PerĂș
+51983478218
carlosalbatun@gmail.com

Continue the discussion