Discussion :

[prolice]

Bonjour,

J'ai un application delphi dans laquelle j'aimerais faire un $DEFINE qui ai une portée global dans mon application
J'ai essayé en écrivant la ligne dans le source (*.dpr)
unit main.dpr:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
program Mod_plt;
{$DEFINE __SAMPLE}

unit other.pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
unit other;
{$IFDEF __SAMPLE}
uses sample1;
{$ELSE}
uses sample2;
{$ENDIF}

Mais dans other.pas j'arrive toujours dans la partie {$ELSE}

Comment faire ?

Merci d'avance

[Alyx²]

Je n'ai jamais utilisé ces $DEFINE.

Mais dans ton exemple, est-ce qu'il sont vraiment nécessaires?

Uses sert uniquement à déclarer les annexes de la form, je crois bien.
Est-ce que comme ca, ca ne serait pas aussi simple?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
unit other;
 
uses sample1, sample2;

[slimjoe]

Salut!

Ne dois tu pas inclure le fichier dans l'entête de ton unit ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

{$i Mod_plt.dpr}

Personnellement, je mets mes DEFINES dans un fichier .inc et j'ajoute au début de mes units :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

{$i defs.inc}

Bon dev!

[denokan]

mais c'est très astucieux ça

[e-ric]

Salut

J'ai déjà eu le problème du $DEFINE dans Delphi 3, il n'était pas pris en considération. La seule solution que j'ai trouvé à ce problème consistait à supprimer le $DEFINE du code du projet et de placer la définition équivalente dans les options du projet (directives conditionnelles).

Pense à tout reconstruire après le changement de cette directive, sinon tu peux avoir des surprises fâcheuses.

Cdlt

e-ric

[sjrd]

Au niveau de l'application, tu peux le définir dans les options du projet. Mais je ne sais plus exactement quel onglet ("Compilateur" probablement)