🚀 go-pugleaf

Hello,
Thanks for you reply and teach.

But, would you please to tell me how to define "Holder.ClickHandler" ???

Or, would you please to give me a full example ??

Best regards,
Eric

Niklas Lagergren wrote:

> This is a procedure that I ripped from on of my programs that does it:
>
>   procedure InitPlugin(ParentMenu: TMainMenu);
>   var
>     i: TMenuItem;
>
>   begin
>     // Create new menu item
>     i := NewItem('Plugin &1',       // Caption
>                   scNone,               // Shortcut
>                   False,                // Checkmark
>                   True,                 // Enabled
>                   Holder.ClickHandler,  // Event handler
>                   0,                    // Help context ID
>                   'Plugin_1');          // Name
>     ParentMenu.Items[0].Add(i);
>   end;
>
> Lookup NewItem in the help if you don't understand it...
>
> Regards,
> Lani
>
> "Chow Hoi Ka, Eric" skrev:
>
> > Hello,
> >
> > How to dynamically add a menuitem in run-time ?
> > And if it is possible, how to dynamically add the action-event(Click)
> > for it ?
> >
> > For example,
> > The following is the Menu structure :
> >
> > [Edit]
> > Undo
> > Cut
> > other_Menu_Item
> >
> > My main question is that how can I dynamically add the other_menu_item
> > in thge Edit menu in run-time and with the Click Event?
> > If I don't know how many "other_Menu_Item" will be added in the design
> > time, how to implement this with Click Event?
> >
> > Would you please to give me a simple example about this ????
> >
> > Best regards,
> > Eric
> >
> > --
> >      _                                                  _
> >     / ) |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| ( \
> >    / /  |                                            |  \ \
> >  _( /_  | _   Chow Hoi Ka, Eric                    _ |  _) )_
> > (((\ \> |/ )                                      ( \| </ /)))
> > (\\\\ \_/ /   E-Mail : d951686@sftw.umac.mo        \ \_/ ////)
> >  \       /                                          \        /
> >   \    _/     http://www.sftw.umac.mo/~d951686/      \_     /
> >   /   / |____________________________________________| \    \
> >  /   /                                                   \    \

--
     _                                                  _
    / ) |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| ( \
   / /  |                                            |  \ \
 _( /_  | _   Chow Hoi Ka, Eric                    _ |  _) )_
(((\ \> |/ )                                      ( \| </ /)))
(\\\\ \_/ /   E-Mail : d951686@sftw.umac.mo        \ \_/ ////)
 \       /                                          \        /
  \    _/     http://www.sftw.umac.mo/~d951686/      \_     /
  /   / |____________________________________________| \    \
 /   /                                                   \    \