Delphi - leer datos de un archivo .txt

quiero leer datos de un archivo de 2 columnas asi:

0.1 10
0.2 13
0.3 90

de dos en dos gracias por su ayuda!!

var
data : system.text;
s : string;
ndato1 : double;
ndato2 : integer;
begin
try
assign(data,'<ruta que quieras>\data.txt');
reset(data);
read(data, s); //leo la 1ª línea
while not eof(data) do begin
try
ndato1 := StrToFloat(copy(s,1,3));
ndato2 := StrToInt(copy(s,5,2));
except
on E: Exception do ErrorDialog('Error en archivo', E.HelpContext);
end;
// aquí usa ndato1 y ndato2 para lo que quieras
....
....
....
//
read(data, s); //leo otra línea
end;
end;
finally
system.close(data);
end;
end;