eliminar lineas de un txt.

[danytorres]

Disculpen por no decir el error: EstringListError 'List index out of bounds (0)',

Nose como corregirlo.

[jmariano]

Está claro que el error debe de estar en la variable "Campos" que no tiene elementos. Prueba lo siguiente:

Código Delphi [-]
    ... 
    Campos.CommaText:= Archivo[i];
 
    if Campos.Count > 0 then
      Codigo:= Campos[0];
    ...