Ver Mensaje Individual
  #8  
Antiguo 14-07-2006
Ricomarz Ricomarz is offline
Miembro
 
Registrado: jul 2006
Ubicación: Ensenada B.C
Posts: 18
Reputación: 0
Ricomarz Va por buen camino
Question Ayuda con la separacion de las columnas de un archivo .txt

Hola Buenas tardes, quisiera ver si alguien me puede ayudar con un problema que tengo al leer un archivo .txt y separar el contenido de este, Mi problema es el siguiente: Tengo un archivo .txt el cual tiene 7 columnas, entre cada columna hay varios espacios en blanco, trate de hacer un explode para que me separe las columnas si encuentra un espacio en blanco, pero no lo hace ya que el numero de espacios en blanco varia de columna a columna.......

asi llamo el explode:

If FileExists ('E:\LeerArchivo\uabcdili.txt') Then //veo si existe el archivo
begin
AssignFile (Fichero,'E:\LeerArchivo\uabcdili.txt');
Reset (Fichero);
While not Eof(Fichero) Do
Begin
Readln(Fichero,Linea);
StringArray:=Explode(' ',Linea); // lo agrego a un arreglo
....
....
....
end;
CloseFile (Fichero);
end;

espero me puedan ayudar ...........

Por favor enviarme sus respuestas a ricomarz@hotmail.com .
Saludos .........

Última edición por Ricomarz fecha: 14-07-2006 a las 01:55:22.
Responder Con Cita