IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

 Delphi Discussion :

Interompre boucle while not EOF(F)


Sujet :

Delphi

  1. #1
    Membre actif
    Profil pro
    Inscrit en
    Décembre 2007
    Messages
    549
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2007
    Messages : 549
    Points : 226
    Points
    226
    Par défaut Interompre boucle while not EOF(F)
    Bonjour

    Je lis un fichier texte avec une boucle while not EOF(F).
    Seulement, j aimerais pouvoir interrompre la lecture apres X lignes.

    si je fais un exit apres le test de la variable compteur, c est la procedure que je quitte alors que je ne souhaite quitter que la boucle...

    Je pourrais le faire mais j aimerais savoir s il existe une solution pour interrompre une telle boucle

    Merci de votre aide

  2. #2
    Expert éminent sénior
    Avatar de Jipété
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    10 875
    Détails du profil
    Informations personnelles :
    Localisation : France, Hérault (Languedoc Roussillon)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 10 875
    Points : 15 299
    Points
    15 299
    Par défaut
    Yop !

    Utilise Break.
    Extrait de l'aide Delphi :
    La procédure Break fait quitter le flux de contrôle dans le code Delphi d'une instruction for, while ou repeat et passe à la prochaine instruction qui suit l'instruction de boucle.

    Un appel à Break doit être contenu dans une instruction for, while ou repeat, ou bien le compilateur génère une erreur.

  3. #3
    Expert confirmé
    Avatar de anapurna
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    3 434
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 434
    Points : 5 846
    Points
    5 846
    Par défaut
    salut

    il suffit de connaitre ta condition de sortie
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    i := 0 
    while ((not(f.eof)) and (i < X)) do
    begin
      ....
      Inc(i);
    end;
    @+ Phil

  4. #4
    Membre actif
    Profil pro
    Inscrit en
    Décembre 2007
    Messages
    549
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2007
    Messages : 549
    Points : 226
    Points
    226
    Par défaut
    Merci à vous deux

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Boucle while until EOF et .csv : problème
    Par Karshick dans le forum Macros et VBA Excel
    Réponses: 21
    Dernier message: 01/10/2014, 17h49
  2. Boucle WHILE "not properly ended"
    Par damngod dans le forum Débuter
    Réponses: 2
    Dernier message: 10/11/2010, 09h42
  3. comment faire" while not eof do" en builder c++
    Par thered dans le forum C++Builder
    Réponses: 3
    Dernier message: 04/10/2009, 10h36
  4. [MFC] Dialog dans une boucle while
    Par oxor3 dans le forum MFC
    Réponses: 5
    Dernier message: 23/04/2004, 22h51
  5. [débutant]Documentation? boucle "while"? Session?
    Par o151181 dans le forum Servlets/JSP
    Réponses: 2
    Dernier message: 19/01/2004, 15h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo