Ver Mensaje Individual
  #1  
Antiguo 17-05-2007
mp3968 mp3968 is offline
Registrado
 
Registrado: may 2007
Posts: 3
Reputación: 0
mp3968 Va por buen camino
Question Leer varios archivos de texto y extraer solo 2 lineas de ese texto

hola , necesito Leer varios archivos de texto y extraer solo 2 lineas de ese texto para guardarlos en otro archivo ese texto que extrai del original , me gustaria que se fuera agregando al archivo generado cada vez que leo un archivo.

habia empezado con esto pero estoy un poco confundido

afichero : string ;
t: TStrings;
begin
t := TStringList.Create;
{...}
aFichero := TStrings.Create;
aFichero.LoadFromFile('c:\StarBurn.log');
Edit1.Text := aFichero.Strings[19];
end;

estoy trabajando con delphi 6 , muchas gracias por su ayuda
Responder Con Cita