Bonjour,
Je crée avec ce code des composants TImage dans une boucle "For"
J'ai donc plusieurs "Timage" qui sont créés dans la boucle For et qui portent chacun un nom via la propriété "Name".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 With Timage.Create(pnlParent) do begin Top:= 7 + (TailleCase div 2) + (i * TailleCase); Width:= TailleCase; Height:= TailleCase; Name:='_' + intToStr(k) + '_' + IntToStr(j + 1) + '_' + IntToStr(i + 1); OnMouseMove:= MouseMoveSurCase; end;
J'ai besoin d'accéder lors de l'évenement "OnMouseMove" d'un Timage quelconque aux propriétés de tous les TImage qui ont la même valeur "k" que le TImage en question, dans leurs noms.
Pour accéder aux propriétés du TImage survolé par la souris, çà je sais faire viamais pour accéder aux propriétés des autres TImage que celui qui est survolé par la souris, j'en appelle à votre aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part TImage(Sender)
Merci d'avance
Partager