Ver Mensaje Individual
  #1  
Antiguo 04-11-2004
chelejuan chelejuan is offline
Miembro
 
Registrado: nov 2004
Posts: 36
Reputación: 0
chelejuan Va por buen camino
Leer ultima linea de un archivo ???

Buenas, lo primero un saludo a todos

Ahora mi duda, tengo un fichero con varias lineas y necesito leer la ultima linea y tener sus datos, realmente solo necesito un dato de toda la linea.

Los datos lo tengo en un fichero que se donde esta y donde anteriormente yo he escrito unos datos.

Los datos tengo que conseguirlo en este plan :

0123|asdfasdf|datoaconseguir|sdfsadf

El dato siempre esta en la misma posicion de la linea ( de la 22 a la 26 ) .

¿Como podria hacer esto?.

Ahora mismo para conectarme y demas hago esto :

Código:
 AssignFile(f,Edit3.text);
 		 if fileexists(Edit3.text) then
 			begin	 // seguir escribiendo
 			append(f);
 
 			Readln(F);
 
 			end
 
 		 else
 
 			 begin // crear archivo
 			  rewrite(f);
 			  numApunt := numApunt + 1;
 		  end;

Pero lo siguiente de leer la ultima fila no me sale

Venga gracias anticipadas, un saludo.
Responder Con Cita