[Const et Case] Delphi Laxiste ?

**Manopower** · 03/10/2005, 16h20

Bonjour, je viens de remarquer un petit détail irritant (pas grave j'aurais oublié demain mais bon...)

Delphi demande normalement de la rigueur pour la déclaration des variables.

J'ai donc écris ma constante comme ceci

Code :

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

1
2
const
  CONST_ZERO : Integer = 0;

Puis utilisé comme cela

Code :

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

1
2
3
Case MaVariable of
  CONST_ZERO : showmessage('zéro');
end;

Si vous recopiez ce code, vous pourrez voir un joli plantage "expression constante attendue"

alors que si on écrit (en étant moins précis donc)

Code :

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

1
2
const
  CONST_ZERO  = 0;

Puis utilisé comme cela

Code :

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

1
2
3
Case MaVariable of
  CONST_ZERO : showmessage('zéro');
end;

là ça passe bien !

Y a t il une option de compilation à décocher ou Delphi s'est-il mis en vacances niveau rigueur d'écriture ?

**Rayek** · 03/10/2005, 16h31

En regardant l'aide de D2005

Une vraie constante est un identificateur déclaré dont la valeur ne peut changer. Par exemple,
const MaxValue = 237;
déclare une constante appelée MaxValue qui renvoie l'entier 237. La syntaxe de déclaration d'une vraie constante est :

const identifier = constantExpression
où identifier est un identificateur valide et constantExpression est une expression qui peut être évaluée par le compilateur sans exécuter le programme.

Si constantExpression renvoie une valeur scalaire, vous pouvez spécifier le type de la constante déclarée en utilisant un transtypage de valeur. Par exemple :
const MyNumber = Int64(17);
déclare une constante appelée MyNumber, de type Int64, qui renvoie l'entier 17. Sinon, le type de la constante déclarée est du type de constantExpression.

**Manopower** · 03/10/2005, 16h55

bonjour Malatar,
ça n'explique pas pourquoi mon case provoque une erreur dans un cas de déclaration de ma constante et pas dans l'autre ?
Ou alors je n'ai pas bien compris ton explication

**sjrd** · 03/10/2005, 19h10

Le code suivant :

Code :

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

1
2
const
  CONST_ZERO : Integer = 0;

Ne déclare pas une constante mais bien une variable initialisée à 0 !

**e-ric** · 03/10/2005, 20h46

Salut

C'est quand même bizarre, y-a-t'il une justification convaincante à cette sémantique qui me semble trompeuse et pas très régulière ?

Serait-elle connexe aux constantes modifiables (post remontant à quelques temps auquel j'avais répondu)

cdlt

e-ric

**Bestiol** · 03/10/2005, 20h52

Non ce n'est pas une variable initialisée, mais une constante typée !
Sinon ce serait :

Code :

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

1
2
var
  CONST_ZERO: Integer = 0;

La différence ? La possibilité de déclarer des constantes tableau, enregistrement, procédure, pointeur...

Je n'ai pas trouvé dans l'aide d'indication par rapport aux constantes modifiables

**Manopower** · 04/10/2005, 09h04

c'est quand même balot que le Case n'accepte pas de constante Typée d'un bon type (integer dans l'exemple).

Et surtout le message d'erreur n'est pas clair "expression constante attendue" il faudrait avoir "expression constante non typée attendue"

Cette erreur se reproduit-elle sur Delphi 2005 ?

**Rayek** · 04/10/2005, 10h23

Envoyé par -Sylvain Leray-

c'est quand même balot que le Case n'accepte pas de constante Typée d'un bon type (integer dans l'exemple).

Et surtout le message d'erreur n'est pas clair "expression constante attendue" il faudrait avoir "expression constante non typée attendue"

Cette erreur se reproduit-elle sur Delphi 2005 ?

L'erreur est tres clair je trouve, ce que tu déclares est une variable pas une constante typée (voir ce que j'ai mis en rouge pour typer une constante).

Envoyé par Aide D2005

La syntaxe de déclaration d'une vraie constante est :

const identifier = constantExpression

**Manopower** · 04/10/2005, 11h17

Envoyé par Malatar

const MyNumber = Int64(17);
déclare une constante appelée MyNumber, de type Int64, qui renvoie l'entier 17

Code :

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

 const MyNumber = Int64(17);

est bien équivalent (au type de variable près) à :

Code :

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

const MyNumber : Integer = 17;

Si on en croit Bestiol, on ne déclare pas une variable, mais bien une constante typée.

Désolé si c'est une polémique stérile, mais cette sémantique me trouble ! Quel intérêt de mettre Const au lieu de Var pour déclarer une variable dans ce cas ?

**Rayek** · 04/10/2005, 11h52

Envoyé par -Sylvain Leray-

Désolé si c'est une polémique stérile, mais cette sémantique me trouble ! Quel intérêt de mettre Const au lieu de Var pour déclarer une variable dans ce cas ?

Reponse dasn l'aide :

Envoyé par Aide Delphi 2005

Une vraie constante est un identificateur déclaré dont la valeur ne peut changer

Déclare une variable et gère la comme une constante, le jour où sans le vouloir tu modifies cette variable, tu vas chercher des heures pourquoi ton prog bug a tel ou tel endroit.
Alors qu'avec une constante cette valeur ne peut en aucun cas être modifier.
D'où la différence.

**Eric.H** · 04/10/2005, 12h29

De mémoire les "contantes typés affectables" sont equivalent aux declaration static du langage C

**Bestiol** · 04/10/2005, 18h44

Envoyé par Eric.H

De mémoire les "contantes typés affectables" sont equivalent aux declaration static du langage C

Oui mais là, une constante typée n'est pas affectable... Essaye, ça ne compilera pas !

Je ne retrouve même pas comment faire une constante affectable

**Eric.H** · 05/10/2005, 10h30

Envoyé par Bestiol

Oui mais là, une constante typée n'est pas affectable... Essaye, ça ne compilera pas !

Ben si no problemo 8)

Code :

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

1
2
3
4
5
6
7
8
procedure TForm4.Button1Click(Sender: TObject);
CONST _Test_:Byte=0;
begin
  Inc(_Test_);
  _Test_:=_Test_+1;
  ShowMessage(IntToStr(_Test_));
 
end;

Mais bien entendu pour cela il faut cocher "Constantes Typées affectables" dans les options du compilateur.

**Manopower** · 05/10/2005, 10h33

Et quel intérêt d'utiliser une déclaration constante typée pour modifier sa valeur à l'éxecution ? Dans ce cas c'est la même utilisation qu'une variable, donc il serait plus rigoureux de la déclarer var plutôt que const ?

A moins que j'ai omis une subtilité.

**Eric.H** · 05/10/2005, 10h48

Dans le petit exemple plus haut

Premier click : affiche 2
Deuxieme clicke : affiche 4.....

la constante type n'est affecté qu'au démarrage du programme. Alors que la const est dans une procedure.... elle garde toujours sa valeur lorsque l'on revient dans la boucle. Dans certains cas cela peut être pratique.

Donc le bon terme est celui du language C, a savoir une variable static
Si Borland avait rajouter le mot clé, cela aurait été plus clair