Discussion :

[ChPr]

Bonjour à toutes et à tous,

Travaillant aujourd'hui avec Lazarus 2.0.6, j'essaie la version 2.0.10.

En compilant IndyLaz, j'obtiens l'erreur suivante :

Code :

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

IdMessage.pas(831,17) Error: Operator is not overloaded: "TEncoding" = "TIdMessageEncoding"

à la ligne 831 du fichier "IdMessage":

Code :

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

    if Encoding = meMIME then

Une idée du problème ?

Cordialement.

Pierre.

[tourlourou]

Bonjour,
En regardant ici, je trouve les définitions et code suivants :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
TIdMessageEncoding = (meDefault, meMIME, mePlainText); // ligne 358
 
TIdMessage = class(TIdBaseComponent)
//...
FEncoding: TIdMessageEncoding;
//...
property Encoding: TIdMessageEncoding read FEncoding write SetEncoding; // ligne 478
 
//...
 
procedure TIdMessage.GenerateHeader;
//...
  if Encoding = meMIME then // ligne 811

Je ne vois donc rien là qui justifie l'erreur signalée, qui laisse supposer qu'une propriété Encoding serait dans ton paquet d'un type différent.
Le curseur sur la variable concernée dans l'EDI devrait te montrer son type et permettre de remonter à sa déclaration pour vérifier la compatibilité, non ?

[ChPr]

Avec la version 2.0.6 ce même composant IndyLaz se compile sans aucun problème.

Il me semble avoir déjà été confronté à ce problème de "overload" en passant d'une version à l'autre. Mais je ne m'en souviens plus.

Cordialement.

Pierre.

[ChPr]

J'ai remplacé :

Code :

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

if Encoding = meMIME then

par

Code :

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

if Encoding = TEncoding(meMIME) then

et c'est passé comme une lettre à la poste ???

Cordialement.

Pierre.

[tourlourou]

Ce message signifie qu'on n'a pas déclaré de surcharge de l'opérateur d'égalité pour indiquer au compilateur comment comparer une variété de carotte (TEncoding) et une variété de chou (TIdMessageEncoding) !
Comme ce sont 2 énumérations, le transtypage passe et fonctionne pour peu qu'ils soient de même taille et dans le même ordre.
Pour comprendre pourquoi ils ne sont pas du même type dans ton paquet, reste à vérifier où pointent les déclarations et si l'ordre des uses n'appelle pas le meMime de TEncoding déclaré en dernier, plutôt que celui de TIdMessageEncoding.
Je pense que tu peux aussi résoudre le problème en préfixant la valeur : TIdMessageEncoding.meMime pour le forcer à utiliser le type souhaité.

[ChPr]

Je comprends ce que tu veux dire.

Pour autant, mon paquet IndyLaz étant identique dans les deux cas, le problème vient bien du changement de version ; l'une acceptant et pas l'autre certains types de transtypage ou autre.

Cordialement.

Pierre.