¿Por qué no quieres leer la línea completa? ¿hablamos de varios Gigabytes?
La forma más comoda, es cargar todo el archivo en un TStringList llamado "Archivo", despues accedes a una línea de texto y la descompones en otro StringList llamado Linea:
Código Delphi
[-]
var Archivo, Linea:TStringList;
i:integer;
begin
Archivo := TStringList.Create;
Linea := TStringList.Create;
Archivo.LoadFromFile ('c:\....');
Linea.Commatext := Archivo[3]; for i:= 0 to Linea.Count-1 do
ShowMessage(linea[i]);
if Linea.Count > 0 then
ShowMessage(Linea[1]);
Saludos