[AGAG4]

Para leer de linea a linea utiliza un..

Código Delphi [-]
//Mientras no sea Fin de Archivo
While EOF(Archi) do begin
Readln(Archi,Linea);//Linea =String
........
{ ExtraeDatoDelimitador(Linea,'1',',');
Primer Parámetro: Linea=Variable String
Segundo Parámetro: '1' que dato va agarrar en este caso el dato de la 1er Coma
Tercero Parámetro: ','=Caracter Separador 
}
Tabla.Insert;
Tabla.Campo1.Value:=ExtraeDatoDelimitador(Linea,'1',',');
Tabla.Campo2.Value:=ExtraeDatoDelimitador(Linea,'2',',');
Tabla.Campo3.Value:=ExtraeDatoDelimitador(Linea,'3',',');
Tabla.Campo4.Value:=ExtraeDatoDelimitador(Linea,'4',',');
Tabla.Post
end;

La opción que dice Roman de usar TStringList es Excelente, pero tengo la duda, como saber cual es el Delimitador para separar los datos????
ó ya esta estandarizado que se tiene que usar entre comillas separado con comas????

Espero te haya ayudado.
Saludos.