Salu2 amigos.
Estoy importando un archivo CVS separado por ";" el cual es generado con excel a partir de un XLS normal, pero tengo un problema con lo siguiente:
Aquí dejo 2 líneas de ejemplo que contiene el archivo:
Código Delphi
[-]2014;3;860;202;202;23565857-7;A;R;I;15/10/2011;;354;554;;0;S;;20;131;554;1;41013001;117924;117924;117924;117924;117924;117924;117924;117924;11 7924;117924;117924;117924
2014;3;861;35;35;05148366-9;D;R;I;15/03/2011; ;121;101; ;0;S; ;23;223;101;133;41022003;25742;25742;25742;25742;25742;25742;25742;25742;25742;25742;25742;25742
La primera línea la lee e inserta sin problemas en un StringGrid, pero la segunda produce un error al tratar de insertar el valor que viene después de "15/03/2011", en este caso ' '.
Código Delphi
[-]
for i := 0 to Lineas Do
Begin
fila.CommaText := csv.Strings[i];
fila.Delimiter := ';';
fila.DelimitedText := fila[0];
For j := 0 To Columnas Do
lista.Cells[j+1,i+1] := fila[j];
End;
Y el error que me da es:
Código SQL
[-]Project Proyecto.exe raised exception class EStringListError with message 'List index out of bounds (11)'. Process stoped.
Espero puedan ayudarme a solucionar este inconveniente.
Salu2.