Option Strict On
Option Explicit On

Imports System
Imports System.Collections.Generic
Imports Nexamas.UI.Controls
Imports Nexamas.UI.Composition
Imports Nexamas.UI.General
Imports Nexamas.UI.Icons
Imports Nexamas.UI.Layout
Imports Nexamas.UI.Rendering
Imports Nexamas.UI.Theming
Imports Nexamas.UI.Values
Imports SkiaSharp
Imports Nexamas.UI.Architecture

Namespace Nexamas.UI.Components


    Partial Public Class MASToolbar
        Private Sub OnInternalButtonClick(sender As Object, e As EventArgs)
            Dim ctrl As MASControlBase = TryCast(sender, MASControlBase)
            Dim id As String = FindIdByControl(ctrl)

            RaiseEvent ButtonClicked(Me, New MASToolbarButtonClickedEventArgs(id, ctrl))
        End Sub

    End Class

End Namespace