Problème à la déclaration d'un type local
Voici mon code, qui a un comportement pour le moins bizarre :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
procedure Quelle_trajectoire (A,B,C : real ; var D : string);
Type
TQuelPoint = ( _pt_PREMIER_ACCOST,
_pt_DERNIER_DEGAGE,
_pt_PETIT_DEGAGEMENT,
_pt_COURANT);
Var
ret : integer;
Begin
//CODE QUELCONQUE
end; |
La déclaration du type"TQuelPoint " en local, qui est une énumération, me décale toutes mes valeurs de parenthèses :
exemple : en entrée A=1, B=2 et C=3
Dès l'entrée dans le code : B=1 et C=3.
Si j'enlève la déclaration du type, tout rentre dans l'ordre .......
Je ne comprends plus rien
