, menu openen, hè?,, in de vorm van wm_menuselect nieuws werkt niet controleren, open.Omdat de ouders niet, pop, vorm (onderzoek tpopupmenu - methode).Een daarvan is het gebruik van API - eigen:,,,,,,, is een gebeurtenis = (platform),,...,, programma 's formmousedown (afzender: TObject; knopen: tmousebutton;,, tshiftstate; de X - en Y - verandering:: gehele);,, privé, ismenuopen: Bull., wmmenuselect (var, programma' s boodschap: twmmenuselect); informatie wm_menuselect;,,, een gebeurtenis plaatsvindt. Wmmenuselect (VAR nieuws: twmmenuselect);,,,,, te beginnen met de erfenis niet; ismenuopen:= ((message.menuflag dollar en FFFF > 0), (message.menu = 0);,, aan het einde van;,,, programma een incident. Formmousedown (afzender: TObject; knopen: tmousebutton;,,, veranderen: tshiftstate; X, y: gehele);,,,, als de knop = mbright dan, en het gebruik van (punt (x, Y) doen, trackpopupmenueX (popupmenu1.handle, tpm_leftalign, X, Y, de zelfafhandeling, geen);,,,, te beëindigen;