Fråga : Onclick för den Popup menyn avfyrar inte händelse

Jag har en popup meny som skapar dynamiskt förser med text baserat på värdera i ett raster (asg2), och det fungerar något liknande som, jag önskar den… undantar…., den OnClick händelsen gör inte för class=" codeSnippet " för fire.

1 för >procedure TForm1.asg2MouseDown (avsändare " för prettyprint " för class= för id= " codeSnippet861505 " för >


Neither ska Ping2Click nor Check1Click avfyrar, när det respektive menyobjektet är idéer för selected.

Any?
" klar "

Svar : Onclick för den Popup menyn avfyrar inte händelse

Precis en snabb look till och med ditt kodifierar, why du skapar dessa meniutems och förstör därefter dem i det samma tillvägagångssättet?
Långt har du gjort det verkar annars för att vara korrekt -- du tilldelar det känt av eventhandleren till händelsen, som in
  mi2.OnClick: = Check1Click;  
, när därefter användaren klickar på mi2, Check1Click får kallad
Du kan därefter använda avsändareparametern för att se vilka knäppas kallat det.

Emellertid efter dig sade mi2.OnClick: = Check1Click; i ditt källa-kodifiera, dig förstör omgående det, dvs. mi2.destroy;
Andra lösningar  
 
programming4us programming4us