add Expander bindings.

fsprojects · May 14, 2024 · c68392e · c68392e
1 parent cd4d413
commit c68392e
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/src/Avalonia.FuncUI/DSL/Expander.fs b/src/Avalonia.FuncUI/DSL/Expander.fs
@@ -4,6 +4,7 @@
 module Expander =
     open Avalonia.Animation
     open Avalonia.Controls
+    open Avalonia.Interactivity
     open Avalonia.FuncUI.Types
     open Avalonia.FuncUI.Builder
 
@@ -12,6 +13,18 @@ module Expander =
 
     type Expander with            
 
+        static member onCollapsed<'t when 't :> Expander>(func: RoutedEventArgs -> unit, ?subPatchOptions) =
+            AttrBuilder<'t>.CreateSubscription<RoutedEventArgs>(Expander.CollapsedEvent, func, ?subPatchOptions = subPatchOptions)
+
+        static member onCollapsing<'t when 't :> Expander>(func: CancelRoutedEventArgs -> unit, ?subPatchOptions) =
+            AttrBuilder<'t>.CreateSubscription<CancelRoutedEventArgs>(Expander.CollapsingEvent, func, ?subPatchOptions = subPatchOptions)
+
+        static member onExpanded<'t when 't :> Expander>(func: RoutedEventArgs -> unit, ?subPatchOptions) =
+            AttrBuilder<'t>.CreateSubscription<RoutedEventArgs>(Expander.ExpandedEvent, func, ?subPatchOptions = subPatchOptions)
+
+        static member onExpanding<'t when 't :> Expander>(func: CancelRoutedEventArgs -> unit, ?subPatchOptions) =
+            AttrBuilder<'t>.CreateSubscription<CancelRoutedEventArgs>(Expander.ExpandingEvent, func, ?subPatchOptions = subPatchOptions)
+
         static member contentTransition<'t when 't :> Expander>(value: IPageTransition) : IAttr<'t> =
             AttrBuilder<'t>.CreateProperty<IPageTransition>(Expander.ContentTransitionProperty, value, ValueNone)