Código Delphi [-] var sl : TStringList; begin sl := TStringList.Create; sl.LoadFromFile('archivo.txt'); showmessage('linea 3 del archivo : ' + sl[2]); sl.Free; end;
var sl : TStringList; begin sl := TStringList.Create; sl.LoadFromFile('archivo.txt'); showmessage('linea 3 del archivo : ' + sl[2]); sl.Free; end;