Hola, la manera mas sencilla de programar, opino yo es usando dos TSTrings.
Con uno lees el archivo y recorres cada linea de el y con el otro vas separando los datos de cada linea y procesandolo.
O sea seria algo asi.
Código Delphi
[-]
var
tsTrama, tsArchivo : TStrings;
:
:
tsArchivo.loadfromfile('Archivo.txt');
for i := 0 to tsArchivo.count-1 do
Begin
tsTrama.CommaText := tsArchivo[Indice];
for j:=0 to tsTrama.count-1 do
Begin
Campoj := tsTrama[j];
End;
Campo0 := tsTrama[0];
Campo1 := tsTrama[1];
Campo2 := tsTrama[2];
end;
Supuse que los datos vienen en el formato de separados por comas por el ejemplo que pones.
Bueno espero que resuelvas y buena suerte.
Juan Carlos