Discussion :

[serve]

Bonjour,

Dans le cours de Monsieur RM di Scala (page 534) je trouve l'expression suivante:

Code :

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

1
2
 
self.Lines.Append('adresse Memo = '+inttostr(self.Handle));

Self désignant un objet et handle identifiant un objet, que signifie l'expression self.Handle?
N'y a t-il pas redondance?
N'y a t-il pas une méthode moins ésotérique pour dire la mëme chose?

Voilà, je proposerais bien la bise en remerciement, mais je dois vous informer que je n'ai pas de soeur!!
Enfin le coeur y est.
Noël

[lil_jam63]

Dans ton code, self désigne l'objet conteneur et handle, son identifiant au sein du système, je suis vraiment pas doué pour les explications mais je vais essayé de schématiser la chose, exemple:

Code :

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

1
2
3
4
5
6
7
8
9
10
 
var
  Memo1: TMemo;
 
...
 
procedure TMemo.ButtonClick(Sender: TObject);
begin
  self.Lines.Append('adresse Memo = '+inttostr(self.Handle));   
end;

ici l'objet conteneur est TMemo donc Self = TMemo, ce même exemple peut s'écrire de cette façon

Code :

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

1
2
3
4
5
 
procedure TMemo.ButtonClick(Sender: TObject);
begin
  Memo1.Lines.Append('adresse Memo = '+inttostr(Memo1.Handle));   
end;

ici memo1 est une variable de type TMemo (déclaré dans la section var)ou alors

Code :

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

1
2
3
4
5
 
procedure TMemo.ButtonClick(Sender: TObject);
begin
  Lines.Append('adresse Memo = '+inttostr(Handle));  
end;

ici, la propriété lines appartient à l'objet TMemo, puisque la procedure lui appartient aussi, pas besoin de le remettre.
Donc en resumant, Self = Memo1 = TMemo ce qui fait que Self n'est pas unique, tu peux avoir plusieurs TMemo sur une même fiche, maintenant pour identifier cet objet, il y a le handle qui lui est un identifiant unique.
Tout objet dérivant de TWinControl possède un handle permettant de l'identifier au sein du système.

J'éspère avoir été clair dans mes explications, dans le cas contraire, n'hésite pas à redemander.

[Clorish]

Pour etre plus clair :

Self contient l'adresse memoire a partir de laquelle sont stockees les informations relative a une instance d'un objet precis (Memo1 dans notre cas).
LE handle est un "ticket" unique attribué a un objet par le systeme, de maniere a ce que ce dernier puisse retrouver ou acceder a ces donnees. C'est souvent grace au Handle que l'on peux recuperer les informations de taille par exemple d'une forme externe a l'application, le code d'une Dll chargee en memoire, etc ...

Pour plus de precisions sur "Self", Chaque classe est unique mais les instances de celles ci peuvent etre multiples. Une instance de classe est une variable de type contenant l'adresse memoire a partir de laquelle sont stockee les variables de l'objet.
LEs procedures sont quand a elles stockées dans une autre Zone memoire unique partagées par toutes les instances d'un objet.
Quand un objet execute une methode de la classe, elle execute donc une procedure unique partagees par toutes les instances de cette meme classe.
Lors du codage de cette methode (ratachee a une classe et non une instance !) il est souvent necessaire de conaitre l'instance de la classe qui va executer cette methode de maniere a pouvoir recuperer les valuers de ses proprietees.
Self joue donc ce role.
Une adresse de methode peut etre schematisee de la sorte :

Code :

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

1
2
3
4
 
AdresseMEthodeClasse = Record
    AdresseMethodeDeLaClasse, AdresseInstanceDeL'objet : Integer;
End;

AdresseInstanceDeL'objet etant bien sur representé par Self ......

Voila pour ma vison des choses, si j'ai commis des erreurs, rectifiez moi

[serve]

Un très grand merci à Lil-Jam63 ainsi qu'à Clorish. Vos explications sont parfaites et se complètent à merveille. Cela fait plusieurs semaines que j'enrageais sur ce sujet. Il me reste les threads pour me faire du mouron (ou me distraire), mais je vais me faire quelques noeuds supplémentaires aux neurones avant de poser des questions.
Encore merci,
Noël.