Salut Pascal,

C'est vrai j'ai honte, j'aurai pu faire au moins l'effort d'analyser ton prog si gentiment posté. Je m'en excuse encore.
Autre chose qui m'a fait zapper un petit peu ton prog c'est que j'avais réussi avec les expressions régulières.

Mille excuses une fois encore.

Amicalement,
Bruno
"Pascal Peyremorte" <p.peyremorte_oter_ces_mots@free.fr> a écrit dans le message de news: fmt53e$252$1@sd-6498.dedibox.fr...
Bruno Mannina a écrit :
> Salut Pascal,
>
> Merci pour ton code source mais hélas chez moi cela ne fonctionne pas du
> tout avec mon fichier exemple, en fait il sort

Bonjour,

* 2 minutes pour créer un nouveau projet et y mettre :
1 bouton,
1 open dialog
1 memo pour charger le fichier avec LoadFromFile
1 listbox pour mettre le résultat
+ copie de la routine que j'avais posté

* 2 minutes pour voir que :
- le premier PDeb=Nil ne sert plus à rien (reporté par delphi),
- il faut remplacer <>0 par =0 dans la première ligne de la sous procédure (pardi !)
et ça donne :


C'est bien gentil de demander "un peu d'aide", mais fais l'effort de chercher un peu, quand même !
Bon, je veux bien faire ton programme entièrement, mais je le facture à qui ?
:-)

Pascal