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

Free Pascal Discussion :

Utilisation des directives locales [Free Pascal]


Sujet :

Free Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Invité
    Invité(e)
    Par défaut Utilisation des directives locales
    Bonjour,

    Ce code fonctionne
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    bTest := true;
    {$IFDEF Windows}
    {$ELSE}
     {$IFDEF Linux}
     {$ELSE}
       bTest := false;
     {$ENDIF} 
    {$ENDIF}
    Un peu "plus léger", bien que $ELSEIFDEF ne figurant pas dans la documentation, http://www.freepascal.org/docs-html/prog/progse2.html , le code suivant semble fonctionner aussi :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    bTest := true;
    {$IFDEF Windows}
    {$ELSEIFDEF Linux}
    {$ELSE}
      bTest := false;
    {$ENDIF}
    Ma documentation semble donc incomplète. Existe-t-il un équivalent à OR ou AND... qui permette d'écrire plus simplement : Pour tout autre OS que Windows ET Linux, bTest := false; ?

    Cordialement. Gilles

  2. #2
    Rédacteur
    Avatar de darrylsite
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    1 299
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 299
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    bTest := true;
    {$IFNDEF Windows}
     {$IFNDEF Linux}
       bTest := false;
     {$ENDIF}
    {$ENDIF}

  3. #3
    Invité
    Invité(e)
    Par défaut
    Bonjour,

    Oui c'est une solution. Donc, pas de $OR, $AND et autre $NOT... Il est vrai que l'essentiel existe déjà... et qu'on peut se passer de ce "confort".

    Cordialement. Gilles

  4. #4
    Rédacteur
    Avatar de darrylsite
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    1 299
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 299
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    bTest := false;
    {$IF defined(Windows) or defined(Linux)}
       bTest := true;
    {$ENDIF}

  5. #5
    Invité
    Invité(e)
    Par défaut
    Bonjour,

    Vu avec un peu de retard. Cela ouvre d'autres horizons. Merci.
    Cordialement. Gilles

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

Discussions similaires

  1. Devis en direct en ligne en utilisant SAS en local
    Par id301077 dans le forum ODS et reporting
    Réponses: 0
    Dernier message: 22/12/2011, 14h53
  2. Utilisation des directives :old et :new
    Par Kinkin36 dans le forum PL/SQL
    Réponses: 2
    Dernier message: 11/05/2011, 10h00
  3. utilisation des sockets sous windows
    Par Tupac dans le forum Réseau
    Réponses: 2
    Dernier message: 21/12/2002, 18h24
  4. [Crystal Report] Utilisation des vues de sql serveur
    Par Olivierakadev dans le forum SAP Crystal Reports
    Réponses: 2
    Dernier message: 15/11/2002, 17h44
  5. [BCB5] Utilisation des Ressources (.res)
    Par Vince78 dans le forum C++Builder
    Réponses: 2
    Dernier message: 04/04/2002, 16h01

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