problemas con archivos de texto

[[ElKurgan]]

Haya otra posibilidad, y es cargar el archivo en un TStringList. Cuando haces un LoadFromFile interpreta cada retorno de carro como un cambio de elemento, y luego puedes recorrerlo de esta forma:

Código Delphi [-]
MiStringList.LoadFromFile('BueCont_TXT.txt');
for i := o to MiStringList.Count - 1 do
begin
  slínea := MiStringList[i];
  for i:= 1 to Length(sLinea) do
  begin
  ....
end;

Un saludo