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

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

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

#1

Message par GMH » mar. 27 nov. 2018 12:51

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 : 670
Enregistré le : ven. 12 août 2011 18:49
Localisation : Essonne
Status : Hors ligne

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

#2

Message par walkson » mar. 27 nov. 2018 14:48

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

GMH
Niveau 5
Niveau 5
Messages : 163
Enregistré le : dim. 24 juin 2012 13:56
Status : Hors ligne

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

#3

Message par GMH » mar. 27 nov. 2018 17:12

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

Répondre