Problème dans un code delphi dans C++Builder
Bonjour,
Je pose la question ici parce que personne n'a pu trouver la solution sur le forum C++Builder dont voici le lien vers le message : http://www.developpez.net/forums/sho...d.php?t=299863
Ce code se compile sans problème dans delphi mais pas dans la personnalité C++Builder de BDS2006.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| type
PPoint2px = ^TPoint2px;
TPoint2px = record
x, y: Integer;
class operator Add(const a, b: TPoint2px): TPoint2px; //ligne 49
class operator Subtract(const a, b: TPoint2px): TPoint2px;
class operator Multiply(const a, b: TPoint2px): TPoint2px;
class operator Divide(const a, b: TPoint2px): TPoint2px;
class operator Negative(const v: TPoint2px): TPoint2px;
class operator Multiply(const v: TPoint2px; const k: Real): TPoint2px;
class operator Multiply(const v: TPoint2px; const k: Integer): TPoint2px;
class operator Divide(const v: TPoint2px; const k: Real): TPoint2px;
class operator Divide(const v: TPoint2px; const k: Integer): TPoint2px;
class operator Implicit(const Point: TPoint): TPoint2px;
class operator Implicit(const Point: TPoint2px): TPoint;
class operator Equal(const a, b: TPoint2px): Boolean;
class operator NotEqual(const a, b: TPoint2px): Boolean;
end; |
L'erreur est :
Code:
[Pascal Erreur] Vectors2px.pas(49): 'END' attendu(e) mais 'CLASS' trouvé(e)
Savez-vous comment faire pour adapter ce code?