Discussion :

[Jcpan]

Bonjour

Je viens de telecharger les sources de http://sub0.developpez.com/delphp/index2.php un programme est destiné à être utiliser dans un projet tel qu'un tchat ou un jeu en ligne.
sous delphi7 ça donne ce message d'erreur

Code :

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

  BarLColor: TColor = clDefault;     { Couleur de gauche de la barre de titre }

Code :

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

BarLColor := ImaTitle.Canvas.Pixels[1, 1];

[Erreur] LoginUnit.pas(425): La partie gauche n'est pas affectable

et c'est normal BarLColor est une constante donc je vois pas comment on peut la changer...
si non est ce que c'est un probleme de version ?

Merci d'avance

[Rayek]

Code :

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

  BarLColor: TColor = clDefault;     { Couleur de gauche de la barre de titre }

Il faudrait que tu montres un peu plus du code, car comme çà, BartColor, ne semble pas être une constante, mais une variable à qui on a définit une valeur par défaut.

[Cl@udius]

Salut

Si il s'agit bien d'une constante, à voir dans l'aide: 'Constantes typées affectables', qui mène à la directive de compilation {J+/-}.

C'est un vieil héritage des premières versions de Delphi où les constantes typées étaient toujours affectables. Cet usage est déconseillé aujourd'hui.

@+ Claudius.

[Jcpan]

Merci