wie unten angegeben erstelle ich dynamisch meine ListBoxen

nun will ich aber dem, auch noch einen onklick event hinzufügen.

Wie kann ich das machen ?

tTabSheet.Length++;  //Dynamisches Array hochzählen bei jedem Durchlauf

 tTabSheet[tTabSheet.Length-1] = new TTabSheet( PageControl1 );
 tTabSheet[tTabSheet.Length-1]->Name = "Tab_" + IntToStr(tTabSheet.Length);
 tTabSheet[tTabSheet.Length-1]->PageControl = PageControl1;
 tTabSheet[tTabSheet.Length-1]->Parent = PageControl1;
 tTabSheet[tTabSheet.Length-1]->Caption = (String)cName;
 tTabSheet[tTabSheet.Length-1]->Show();

 lList.Length++;      //Dynamisches Array hochzählen bei jedem Durchlauf

 lList[lList.Length-1]= new TListBox( tTabSheet[tTabSheet.Length-1] );
 lList[lList.Length-1]->Name = "List_" + IntToStr(lList.Length);
 lList[lList.Length-1]->Parent = tTabSheet[tTabSheet.Length-1];
 lList[lList.Length-1]->Align = alClient;
 lList[lList.Length-1]->Items->Clear();
 lList[lList.Length-1]->Style=lbStandard;
 lList[lList.Length-1]->MultiSelect=false;

 PageControl1->Refresh();

http://www.c-plusplus.net/forum/viewtopic.php?t=39206

hab extra gesucht, aber nichts gefunden gehabt ...

jetzt gehts

weise bei der erstellunge einfach

lList[lList.Length-1]->OnClick=ListBoxClick;

zu ...