Leer lineas de un txt sin utilizar ningún componente

[[newtron]]

Bueeeeeeeeeeeeeeeeeeeeeno.... a ver si esto es lo que quieeeeeeeeeeres....

Código Delphi [-]
var
MiFichero : TextFile;
valor :dword;
valor1 :dword;
valorsting : TStringList;
sAux: String;
begin
  valorsting: TStringList.Create;
  AssignFile (MiFichero,(C:\nombre.txt'));
  Reset (MiFichero);
  While not MiFichero.eof do begin
    Readln(MiFichero,sAux);
    valorsting.add(sAux);
  end;
  .....

end;

de esta manera te encontrarás en la variable valorsting[N] los valores de cada una de las lineas del fichero de texto, recuerda hacer un "free" a la variable valorsting cuando ya no la necesites para liberarla de la memoria.

(seguro que alguno de estos "listillos" tiene una forma más simple, efectiva o que use menos recursos para hacer esto, lo estoy viendo...)