bon, j'ai une classe qui a comme un attribut un tableau de 64 Tlabel     Damier: array[1..64] of TLabel
 
quand un TLabel est dans un TForm, on fait comme ça pour associer une procédure à un clic
 
[pascal]
procedure TFTest.Label1Click(Sender: TObject);
[/pascal]
 
mais dans mon cas, je fais comment ?
 
(je voudrais une procédure qui s'éxécute en cas de clic sur le label et un comportement différent en fonction du label cliqué)
 
à votre bon coeur

Tu crées une procédure dans ta Form qui reçoit un paramètre de type TObjet, genre:
[pascal]
TForm1.ClicSurLabel(Sender: TObject)
[/pascal]
 
Et pour l'associer tu fais :
 
[pascal]
Damier[1].OnClick := ClicSurLabel;
[/pascal]
 
Dans la procédure, pour savoir sur lequel on a cliqué :
[pascal]
if Sender = Damier[1] then
 ... on a cliqué sur le premier ...
[/pascal]
 
ou plus simplement :
 
[pascal]
if Sender is TLabel then
with Sender as TLabel do
  begin
  Caption := 'j''ai été cliqué';
  end;
[/pascal]

merci beaucoup
 
 
 
(je vais tester tout ça )