Assignation de valeur à propriété

Bonjour,

Un petit souci qui m'... :

Dans une classe, j'ai une propriété.
Dans une autre, je lui assigne une valeur dans une instance de sa classe.
La valeur est 1.
Dans le setteur de la propriété je vois Value = 16516609.

Le type de la propriété est un enum.
La propriété est dans une classe dans un package bpl.
Son utilisation est faite dans le programme principal.
Les deux sont dans le même groupe de projets et le programme est déclaré dépendant du package. J'ai dabord pensé qu'il s'agissait d'un conflit de config, mais pour autant que j'ai pu voir, elles sont identiques (au fait près qu'on a un package et une application).


Voici les codes :
Déclaration :

Code:

---

1 2 3 4 5 6

typedef enum { tpfLeftOrTop, tpfCenter, tpfRightOrBottom } TPositionFixe; ... private: void __fastcall SetPositionFixe( TPositionFixe Value ); private: TPositionFixe __fastcall GetPositionFixe() const; public: __property TPositionFixe PositionFixe = {read=GetPositionFixe,write=SetPositionFixe};

---

Le setter :

Code:

---

1 2 3 4 5

void __fastcall TBlobControl::SetPositionFixe( TPositionFixe Value ) { FPosAig.PositionFixe = Value; }

---

Ici, lorsqu'on transmet 1 à PositionFixe grace au code suivant, Value vaut 16516609.

Utilisation (dans un package séparé)

Code:

---

1 2 3 4 5

it pos = ((cBlob->PositionFixe+1)%3); ... TPositionFixe posf = (TPositionFixe)pos; cBlob->PositionFixe = posf;

---

Quelqu'un peut-il m'aider à trouver une solution svp?