Normalize MenuItems Widgets

[edgarfgp]

This PR uses the newly added AttributeBundle to CollectionBuilder. See fabulous-dev/Fabulous#1081

This will allow us to have more advance and useful widget constructors. in the case MenuItem and MenuItems

    /// <summary>Creates a MenuItem widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    static member MenuItem(header: string) =
        WidgetBuilder<'msg, IFabMenuItem>(MenuItem.WidgetKey, HeaderedContentControl.HeaderString.WithValue(header))

    /// <summary>Creates a MenuItem widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    /// <param name="onClick">Raised when the menu item is clicked.</param>
    static member MenuItem(header: string, onClick: 'msg) =
        WidgetBuilder<'msg, IFabMenuItem>(
            MenuItem.WidgetKey,
            HeaderedContentControl.HeaderString.WithValue(header),
            MenuItem.Clicked.WithValue(fun _ -> box onClick)
        )

    /// <summary>Creates a MenuItem widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    static member MenuItem(header: WidgetBuilder<'msg, #IFabControl>) =
        WidgetBuilder<'msg, IFabMenuItem>(
            MenuItem.WidgetKey,
            AttributesBundle(StackList.empty(), ValueSome [| HeaderedContentControl.HeaderWidget.WithValue(header.Compile()) |], ValueNone)
        )

    /// <summary>Creates a MenuItem widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    /// <param name="onClick">Raised when the menu item is clicked.</param>
    static member MenuItem(header: WidgetBuilder<'msg, #IFabControl>, onClick: 'msg) =
        WidgetBuilder<'msg, IFabMenuItem>(
            MenuItem.WidgetKey,
            AttributesBundle(
                StackList.one(MenuItem.Clicked.WithValue(fun _ -> box onClick)),
                ValueSome [| HeaderedContentControl.HeaderWidget.WithValue(header.Compile()) |],
                ValueNone
            )
        )

    /// <summary>Creates a MenuItems widget.</summary>
    static member MenuItems() =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(MenuItem.WidgetKey, ItemsControl.Items)

    /// <summary>Creates a MenuItems widget.</summary>
    static member MenuItems(header: WidgetBuilder<'msg, #IFabControl>) =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(
            MenuItem.WidgetKey,
            ItemsControl.Items,
            AttributesBundle(StackList.empty(), ValueSome [| HeaderedContentControl.HeaderWidget.WithValue(header.Compile()) |], ValueNone)
        )

    /// <summary>Creates a MenuItems widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    /// <param name="onClick">Raised when the menu item is clicked.</param>
    static member MenuItems(header: WidgetBuilder<'msg, #IFabControl>, onClick: 'msg) =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(
            MenuItem.WidgetKey,
            ItemsControl.Items,
            AttributesBundle(
                StackList.one(MenuItem.Clicked.WithValue(fun _ -> box onClick)),
                ValueSome [| HeaderedContentControl.HeaderWidget.WithValue(header.Compile()) |],
                ValueNone
            )
        )

    /// <summary>Creates a MenuItems widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    static member MenuItems(header: string) =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(
            MenuItem.WidgetKey,
            ItemsControl.Items,
            AttributesBundle(StackList.one(HeaderedContentControl.HeaderString.WithValue(header)), ValueNone, ValueNone)
        )

    /// <summary>Creates a MenuItems widget.</summary>
    /// <param name="header">The header of the menu item.</param>
    /// <param name="onClick">Raised when the menu item is clicked.</param>
    static member MenuItems(header: string, onClick: 'msg) =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(
            MenuItem.WidgetKey,
            ItemsControl.Items,
            AttributesBundle(
                StackList.two(MenuItem.Clicked.WithValue(fun _ -> box onClick), HeaderedContentControl.HeaderString.WithValue(header)),
                ValueNone,
                ValueNone
            )
        )

    /// <summary>Creates a MenuItems widget.</summary>
    /// <param name="onClick">Raised when the menu item is clicked.</param>
    static member inline MenuItems(onClick: 'msg) =
        CollectionBuilder<'msg, IFabMenuItem, IFabMenuItem>(MenuItem.WidgetKey, ItemsControl.Items, MenuItem.Clicked.WithValue(fun _ -> box onClick))