Add theme binding (#296)

fsprojects · Apr 9, 2023 · 04b300c · 04b300c
1 parent f53800e
commit 04b300c
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/Avalonia.FuncUI/DSL/Base/StyledElement.fs b/src/Avalonia.FuncUI/DSL/Base/StyledElement.fs
@@ -18,7 +18,10 @@ module StyledElement =
 
         static member templatedParent<'t when 't :> StyledElement>(template: TemplatedControl) : IAttr<'t> =
             AttrBuilder<'t>.CreateProperty<AvaloniaObject>(StyledElement.TemplatedParentProperty, template, ValueNone)
-
+
+        static member theme<'t when 't :> StyledElement>(theme: ControlTheme) : IAttr<'t> =
+            AttrBuilder<'t>.CreateProperty<ControlTheme>(StyledElement.ThemeProperty, theme, ValueNone)
+
         static member classes<'t when 't :> StyledElement>(value: Classes) : IAttr<'t> =
             let getter : ('t -> Classes) = (fun control -> control.Classes)
             let setter : ('t * Classes -> unit) = (fun (control, value) -> control.Classes <- value)