Onclick bei dynamischen Labels

[150gozilla]

Mahlzeit :-D

Ich habe eine Frage.

ich habe mir Dynamisch, Labels erstellt, im Formcreate:

Delphi-Quellcode:

Labels[index2]:=TLabel.Create(self);

Jetzt muss ich über eine Prozedur ein onclick ereigniss schreiben, zum beispiel wenn man auf Labels[5] klickt, soll eine meldung kommen.
Wie könnte ich das denn machen ? :gruebel:

Ich bin für jede hilfe dankbar

[Muetze1]

Einfach nur zuweisen:

Delphi-Quellcode:

Labels[5].OnClick := MyOnClick;

...

Procedure TForm1.MyOnClick(Sender: TObject);
Begin
  ShowMessage('Meldung');
End;

[Sunlight7]

Oder so:

Delphi-Quellcode:

For x:=0 to ... do
   Labels[i].OnClick := MyOnClick;

...

Procedure TForm1.MyOnClick(Sender: TObject);
Begin
  If Sender=Labels[5] then
    ShowMessage('Volltreffer!') else
      ShowMessage('Falsches Label angeklickt, Versuchs nochmal.');
End;

[150gozilla]

Danke, für die Hilfe =)