[[coso]]

lo de la primera columna puedes solucionarlo haciendo

Código Delphi [-]
 if (flgInicio=True) and (flgFin=False) then //esto lo puedes simplificar, pero es solo para que se entienda
         slFileNuevo.Add(TrimLeft(StrScan(slFile[i],' '))); //añadimos en el nuevo

si miras la ayuda de delphi, te dira que strscan te devuelve una subcadena desde una cadena a partir de encontrar un carácter (en este caso, ' '). Como incluye el carácter donde se empieza, usamos TrimLeft que elimina los espacios iniciales.

saludos, y a ver si te sirve

PD : una curiosidad, ese archivo parece de coordenadas. Para q servirá la aplicación? :?