Jak w TMenuItem dodać nowe zdażenie np OnMouseDown?
0
0
dodać znaczy chodzi ci oto ze deklarujesz dynamicznie menuitem i chcesz doniego dodac onMouseDown? jeśli tak to musisz zadalekarować sobie metode procedure costam(Senter : TObject);
i jak robisz nowe menuto
piszesz
onMouseDown := costam;
0
Chodzi mi o napisanie nowego komponentu pochodnego od TPopupMenu tak aby TmenuItem miało zdażenie OnMouseDown? [glowa]
0
Popróbuj z OnAdvancedOwnerDraw, tam będzie można wykorzystać takie zdarzenia jak najechanie kursorem na TMenuItem itd.