Questione : Il onclick del menu a finestra non inforna l'evento

Ho un menu a finestra che genera dinamicamente i titoli basati sul valore in una griglia (asg2) e funziona come lo voglio… tranne…. l'evento di OnClick non fa class= " i lineNumbers " >

1 del >

procedure codeBody TForm1.asg2MouseDown (mittente " del prettyprint " " del class= del id= " codeSnippet861505 del >


Neither Ping2Click né Check1Click di 

Any? 


  
  class= del 

Risposta : Il onclick del menu a finestra non inforna l'evento

Appena uno sguardo rapido con il vostro codice, perché state generando questi meniutems ed allora state distruggendoli nella stessa procedura?
Il senso che lo avete fatto sembra al contrario essere corretto -- assegnate il nome del eventhandler all'evento, come dentro
  mi2.OnClick: = Check1Click;  
Allora quando l'utente scatta sopra mi2, Check1Click ottiene denominato
Potete allora usare il parametro del mittente per vedere quale tasto lo ha denominato.

Tuttavia, dopo voi ha detto mi2.OnClick: = Check1Click; nel vostro fonte-codice, immediatamente lo distruggete, cioè mi2.destroy;