Partage
  • Partager sur Facebook
  • Partager sur Twitter

[Delphi] Case of

Question sur la structure

Sujet résolu
woufeigh
    16 novembre 2006 à 22:27:28

    Bonjour, je suis programmeur en delphi, c, php, bientôt cobol...
    J'aimerais savoir un truc sur les case of!

    Il n'est utilisable qu'avec des nombres ça je sais, mais je me demande si on peut utiliser des opérateurs logiques dans les conditions et si on pouvait mettre plus qu'une action par condition?

    Exemple

    case rend of
    500 : rend := 0; writeln '500';
    >=200 : rend := rend - 200; writeln '200';
    end;


    Voila ce que je veux faire est à la ligne deux... Donc la question, puis-je utiliser case of ou dois-je utiliser des if a ne plus finir...?
    Merci d'avance pour vos réponses!
    • Partager sur Facebook
    • Partager sur Twitter
    kokotchY
    • Autres langages (VBA, Ruby,...)
      17 novembre 2006 à 9:14:23

      Teste au lieu de demander...
      Non ca ne marche pas (en tout cas avec fpc).
      Par contre, tu peux définir une fourchette de valeur :

      case rend of
       500 :
       200..1000 :
      end;

      par exemple.

      Et sinon, il faut mettre des begin end pour entourer
      rend := 0; writeln '500';
      et
      rend := rend - 200; writeln '200';

      Et pour terminer, il faut savoir que les conditions du case doivent être mutuellement exclues !
      • Partager sur Facebook
      • Partager sur Twitter
      woufeigh
        18 novembre 2006 à 12:22:47

        Merci ca marche. Par contre faudrait travailler ta diplomatie...
        Bonne journée
        • Partager sur Facebook
        • Partager sur Twitter

        [Delphi] Case of

        × Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié.
        × Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
        • Editeur ●
        • Markdown