[Const et Case] Delphi Laxiste ?

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:

---

1 2	const CONST_ZERO : Integer = 0;

---

Puis utilisé comme cela

Code:

---

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:

---

1 2	const CONST_ZERO = 0;

---

Puis utilisé comme cela

Code:

---

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 ?

En regardant l'aide de D2005

Citation:

---

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.

---

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 :)

Le code suivant :

Code:

---

1 2	const CONST_ZERO : Integer = 0;

---

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

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

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

Code:

---

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 :?

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 ?

Citation:

---

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).

Citation:

---

Envoyé par Aide D2005

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

const identifier = constantExpression

---

Citation:

---

Envoyé par Malatar

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

---

Code:

---

const MyNumber = Int64(17);

---

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

Code:

---

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 ?

Citation:

---

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 :

Citation:

---

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.

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

Citation:

---

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 :?

Citation:

---

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:

---

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. :wink:

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é.

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

Citation:

---

Envoyé par Eric.H

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

---

C'est donc ça :D
Merci ;)

Citation:

---

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

---

+1 ^^