[R] Reprise d'une boucle While 1 .... WEnd

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
GMH
Niveau 6
Niveau 6
Messages : 227
Enregistré le : dim. 24 juin 2012 14:56
Status : Hors ligne

[R] Reprise d'une boucle While 1 .... WEnd

#1

Message par GMH »

Bonjour,

Je souhaiterais qu'arrivé à la fin de la lecture d'un fichier-texte, ligne par ligne, le programme recommence sa lecture au début.
Mon code des plus classiques est :

Code : Tout sélectionner

While 1
	If _IsPressed("1B") then
		ExitLoop
	EndIf
	Local $ligne = FileReadLine($hFile)
	Ici : affichage de la ligne avec temps d'attente 
WEnd
Je vous remercie de m'aiguiller sur une solution.
Modifié en dernier par GMH le ven. 30 nov. 2018 20:05, modifié 1 fois.
Avatar du membre
walkson
Modérateur
Modérateur
Messages : 1020
Enregistré le : ven. 12 août 2011 19:49
Localisation : Hurepoix
Status : Hors ligne

Re: [..] Reprise d'une boucle While 1 .... WEnd  

#2

Message par walkson »

Bonjour,
Comme ça ?

Code : Tout sélectionner

Local $i = 0
While 1
	If _IsPressed("1B") then
		ExitLoop
	EndIf
	$i += 1
	Local $ligne = FileReadLine($hFile, $i)
	If @error Then $i = 0
	Ici : affichage de la ligne avec temps d'attente 
WEnd
Cordialement,
Walkson
"Horas non numero nisi serenas " Le canon de midi
(Je ne compte que les heures heureuses)
GMH
Niveau 6
Niveau 6
Messages : 227
Enregistré le : dim. 24 juin 2012 14:56
Status : Hors ligne

Re: [..] Reprise d'une boucle While 1 .... WEnd

#3

Message par GMH »

Votre solution marche parfaitement. Je vous remercie beaucoup pour votre réponse rapide et efficace.
Répondre