Lecture txt a l'envers [Résolu]

Signaler
Messages postés
40
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
8 juillet 2008
-
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
-
bonjour,

Je voudrais soir si c'est possible de lire un fichier.txt a l'envers c'est a dire en commencant par la fin.
merci d'avance

10 réponses

Messages postés
92
Date d'inscription
vendredi 12 octobre 2007
Statut
Membre
Dernière intervention
20 novembre 2009
1
Je corrige mon précedant post où était mélé des erreurs et des confustions avec Borland C++ Builder:

------------------------------
var list : TStringList;
    i    : integer ;
begin
  list := TStringList.Create;
  list.LoadFromFile('C:\MonFichier.txt');
 
  for i :=(list.Count-1) downto 0 do
    Memo1.Lines.Add( list.Strings[i]);

  list.Free;

end ;
--------------------------------

En esperant avoir pu t'aidé!
Messages postés
3825
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
1 février 2021
38
Salut,

oui c'est possible mais un peut plus de précisions ne serait pas un luxe !!!

Lire un fichier depuis la fin mais comment ?

Ex: Le de fichier Txt:
"oui c'est possible mais un peut plus de précisions ne serait pas un luxe"

Tu veux le lire
Comme ça : exul nu
Ou :  Luxe un
Ou : un luxe

 
@+
Cirec

<hr siz="" />
Messages postés
4719
Date d'inscription
dimanche 26 février 2006
Statut
Modérateur
Dernière intervention
1 février 2021
14
L'arabe et l'hébreu s'écrivent de droite à gauche..
ne serait ce pas la raison ou le début d'un autre verlant ?

cantador
Messages postés
4719
Date d'inscription
dimanche 26 février 2006
Statut
Modérateur
Dernière intervention
1 février 2021
14
sans le 't' à verlan..

cantador
Messages postés
40
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
8 juillet 2008

JE VOUDRAIS LE LIRE EN COMMENCA PAR LA DERNIERE LIGNE PUIS REMONTER MAIS LES LIGNES NORMALEMENT PAS EN VERLAN
Messages postés
4719
Date d'inscription
dimanche 26 février 2006
Statut
Modérateur
Dernière intervention
1 février 2021
14
Dernière ligne..
 je pense que c'est plutôt le dernier caractère de la ligne..
Pour reprendre l'exemple de cirec
c'est donc exul nu
et tu veux à l'arrivée lire un luxe

C'est bien çà ?

cantador
Messages postés
92
Date d'inscription
vendredi 12 octobre 2007
Statut
Membre
Dernière intervention
20 novembre 2009
1
Tu veux lire les lignes d'un fichier texte dans de la derniere a la premiere?

Un exemple avec un Memo qui contiendra le fichier dans l'ordre inverse :

------------------------------
var list : TStringList;
    i    : integer ;
begin
  list := TStringList.Create;
  list.LoadFromFile('C:\MonFichier.txt');
 
  for i= (list->Count-1) downto 0 do
    Memo1.Lines.Add( list.Strings[i];

  list.Free;

end ;
--------------------------------

Je n'ai pas Delphi sous la main, donc il peut y avoir des erreurs de synthaxe. Mais l'idée est là!
Messages postés
40
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
8 juillet 2008

c bon jmen suis sortie merci de vos conseils les gars
continuez comme ca vous faite du bon boulot
Messages postés
4719
Date d'inscription
dimanche 26 février 2006
Statut
Modérateur
Dernière intervention
1 février 2021
14
bon ben la solution on saura pas..
A moins que ce soit un amalgame de toutes les idées émises.

A la revoyure jerome57440,
si tu passes dans le coin fais nous un p'tit coucou.

cantador 
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
37
pour lire n'importe quoi a l'envers :

IMin, IMax, I : integer

IMax = Length(String) // High(Tableau) // List.Count
IMin = 1 {string} // Low(Tableau) // 0 {list}
for I := IMin to IMax do
   Lecture := nimportequoi[IMax - I]

et pour une lecture rotative

  Lecture := nimportequoi[(index mod IMax) + IMin]

<hr size="2" width="100%" />