Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-01-2004
esquerda21 esquerda21 is offline
Miembro
 
Registrado: may 2003
Posts: 51
Poder: 21
esquerda21 Va por buen camino
Readln

Estoy utilizando el Readln que lee la linea y baja. Hay alguna forma que en vez de bajar suba?

Gracias de antemeno.
Responder Con Cita
  #2  
Antiguo 13-01-2004
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 28
Lepe Va por buen camino
Solo puedes resetear la posicion (al principio del archivo).

Si es un fichero de texto cargalo en un Tstringlist por ejemplo y ya podrás recorrerlo en el sentido que quieras:

Código:
var archivo:TStringList;
      i:integer;
begin
archivo:= TStringList.Create;
try
  archivo.LoadFromFile('c:\mio.txt');
  // recorro las lineas al revés
  for i:= archivo.count-1 downto 0 do
     linea := archivo[i];

  finally
     archivo.free;
  end;
Saludos, espero que sea viable
Responder Con Cita
  #3  
Antiguo 14-01-2004
esquerda21 esquerda21 is offline
Miembro
 
Registrado: may 2003
Posts: 51
Poder: 21
esquerda21 Va por buen camino
Gracias otra vez.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 21:32:31.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi