Como leer una linea especifica de un Txt?

[roman]

¿Por qué no usas un TStringList.LoadFromFile para cargar el archivo y luego simplemente acceder a la línea deseada con TStringList[Indice]?

// Saludos

[cloayza]

Segun lo que pude entender si este archivo contiene informacion de configuracion de tu programa, tal como :

- Ruta de archivos de datos
- directorios de trabajo
- valores por defecto
- Etc...

Puedes utilizar un archivo .INI, delphi tiene muchas formas de acceder este de manera muy facil...

Aqui te coloco un poco de codigo...

Var
   Vars:TStrings;
   strRutaDataBase, strXlsTemplate, strDBase
Begin
     Try

          Vars:=TStringList.Create;

          With TIniFile.Create( 'Miconfig.Ini' ) Do
          Begin
               ReadSectionValues('BaseDatos',Vars);

               strRutaDatabase:=Vars.Values['RutaDataBase']; 
               //C:\Apps\Contabilidad\data
               
               ReadSectionValues('Archivos',Vars);

               strXlsTemplate=Vars.Values['XlsTemplate'];  
               //SAI.XLS']
               strDBFiles=Vars.Values['DBFiles']; 
               //PARAMSIM.DBF

               Free;
          End;
     Finally
          Vars.Free;
     End;

Este seria el contenido del archivo Miconfig.Ini

[BaseDatos]
RutaDataBase=C:\Apps\Contabilidad\data

[Archivos]
XlsTemplate=SAI.XLS
DBFiles=PARAMSIM.DBF


Espero te sirva...
Saludos de Christian
Concepcion-Chile

El Domingo 06 jugamos con Brasil...Vamos Chileeeeeeeeeeeeeeeeeeee
!!!chi-le, chichichi, lelele, Viva Chileeeeeeeee!!!

[cloayza]

Var
   Vars:TStrings;
   strRutaDataBase, strXlsTemplate, strDBase:String;

Espero te sirva...
Saludos de Christian
Concepcion-Chile

El Domingo 06 jugamos con Brasil...Vamos Chileeeeeeeeeeeeeeeeeeee
!!!chi-le, chichichi, lelele, Viva Chileeeeeeeee!!!