having issue with tmenuitem onclick (with submenu)
lazarus / 31-LCL

----------------------------------------------------------------------
snorkel · 2012-10-22 17:39

I am using Lazarus 1.0.2 on windows 7 and when I add a submenu to a
tpopupmenu menu item, the parent menuitem onclick event stops firing.
In Delphi when you do this the onlick fires when the submenu opens.

Is there a work around for this? basicly what I want to do is when the
submenu in the tpopupmenu shows I need to select a item in a
tlistview, but since the onclick never fires I can't programmatically
select the related item in the tlistview.

----------------------------------------------------------------------
Bart · 2012-10-22 18:58

Works OK in trunk.
(Win7-64, 32-bit Lazarus)

Bart

----------------------------------------------------------------------
User137 · 2012-10-23 01:48

I put this code in test popupmenus submenuitems parents onClick:
Code: [Select]procedure TForm1.MenuItem1Click(Sender: TObject);
begin
  caption:='ok';
end;
Form caption never changed to 'ok' when i clicked it runtime.
Win7 32-bit, SVN 39092 if i looked number right. Lazarus showed very
different, it's at most 2 weeks old though.

----------------------------------------------------------------------
snorkel · 2012-10-23 04:56

It's supposed to work like a onpopup event when you hover over the
parent item, so you can enable or disable items in the submenu.
I will have to download one of the daily builds and try it out.