Discussion :

[Qwazerty]

Bonjour
Déjà, désolé pour l'intitulé du post mais je voyais vraiment pas quoi mettre

Voila j'ai un probleme d'affectation et j'aimerais bien comprendre pourquoi.
J'utilise Delphi 2005 Perso, je cré un petit composant.

J'ai declarer un type perso dans la partie interface (juste apres les uses)

Code :

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

1
2
3
4
5
6
7
8
 
uses ....
Type 
      TVecteur = record
             Debut : TPoint;
             Fin : TPoint;
      end;
[...]

Mon composant contient une collection.
Dans la partie Item je declare

Code :

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

1
2
3
4
5
6
 
Private
    MaFleche : TVecteur
 
Published
    property Fleche : TVecteur read MaFleche Write SetMaFleche;

Dans ma partie composant je declare

Code :

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

1
2
 
Etapes : TEtapes (ma collection)

Et c'est la que ca se complique quand j'utilise Etapes
Si je fait

Code :

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

1
2
3
 
UneFleche : TVecteur;
Etapes[I].Fleche := UneFleche

Ca pose aucun probleme.
Par contre si je fait

Code :

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

1
2
3
 
UnPoint : TPoint;
Etapes[I].Fleche.debut := UnPoint

A la compilation Delphi s'arrete sur Etapes[I].Fleche.debut := UnPoint et me genere l'erreur suivante E2064 La partie gauche n'est pas affectable

Je comprend ce qu'implique ce message d'erreur mais je ne comprend pas pourquoi il est generé ici, je peux acceder a Fleche mais pas a une de ces composante. J'ai eu ce probleme a plusieur reprise, notement au passage de Etapes[I].Fleche.debut en parametre Var a une procedure.
Edit: Le message d'erreur est alors E2197 Un objet constante ne peut être passé comme paramètre Var /edit

J'ai lu sur un autre forum une personne ayant un probleme similaire et la reponse qui lui a ete donné etait que les declaration dans son type etaent peut etre pas affectable ... mais je comprend pas pourquoi.

Merci pour les explications.
A++
Qwaz

[sjrd]

C'est parfait normal et attendu.

Lorsque tu définis une propriété d'un type record, et que tu souhaites modifier la propriété, tu es obligé d'affecter le record en entier.

En effet, si tu pouvais écrire MonObjet.MaPropRecord.MonChamp := UneValeur; Comment le compilateur transformerait-il cela en un appel à SetMaPropRecord ?

Au passage, cela n'a rien à voir avec les composants, mais avec le langage.

[Qwazerty]

Ok merci pour l'explication je pense saisir le principe, je ne savais pas que le record impliqué un Set..., en faite si j'ai bien compris c'est le meme principe que le declaration d'une variable que l'on rendrait published avec un read ... et write Set...?

Ok donc je vais declarer une variable TVecteur au sein de ma procedure lui renseigner ses proprietés et la transmettre en entier a MaFleche.

J'abuse peut etre un peu mais pourquoi je peux acceder au differentes parties de ma variable local TVecteur? Je m'explique, je sais pas si je suis tres claire...

Dans mon exemple de depart je n'est pas le droit de faire ceci

Code :

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

1
2
3
 
UnPoint : TPoint;
Etapes[i].Fleche.debut := UnPoint;

ni meme

Code :

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

1
2
 
Etapes[i].Fleche.debut.x := 2;

Alors pourquoi dans une variable defini localement je peux le faire

Code :

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

1
2
LocalVecteur : TVecteur;
LocalVecteur.debut.x := 2;

En effet, si tu pouvais écrire MonObjet.MaPropRecord.MonChamp := UneValeur; Comment le compilateur transformerait-il cela en un appel à SetMaPropRecord ?

N'est ce pas ce que je viens de faire dans le dernier encart de code??

Bonne soirée et merci pour les eclaircissement.
++
Qwaz

[sjrd]

Ce que j'ai expliqué ne s'applique qu'aux propriétés. Qu'elles soient publiées ou non, ça ne change rien. Ca ne s'applique pas aux variables ou aux champs : là tu peux directement accéder à chaque champ du record (sinon je me demande bien à quoi servirait un record ).

[Qwazerty]

certe...
ok merci
++