Creates child menu items of the MenuItem for every string in the Strs TStrings parameter.
Namespace: RSVclHelperFunctions
Delphi |
procedure CreateMenuItemChildren(const MenuItem: TMenuItem; const Strs: TStrings; |
Parameters
MenuItem
Type: TMenuItem
Menu Item to create children for
Strs
Type: TStrings
Child menu items to create
OnClickHandler
Type: TNotifyEvent
OnClick event handler for the new menu items
NumberAccel
Type: Boolean
Determines if the menu item caption should include an accelerator based on its number in the list, e.g., '&0 Strs0', '&1 Strs1', etc.
Reference |
