add bindings for 'DataGridTextColumn.width'

fsprojects · Oct 29, 2023 · a4b6ca6 · a4b6ca6 · Aytharn · Oct 29, 2023
1 parent 5bbcb7f
commit a4b6ca6
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 0 deletions.
diff --git a/src/Avalonia.FuncUI/DSL/DataGrid.fs b/src/Avalonia.FuncUI/DSL/DataGrid.fs
@@ -68,6 +68,15 @@ module DataGridColumn =
         static member cellTheme<'t when 't :> DataGridColumn>(value: ControlTheme) : IAttr<'t> =
             AttrBuilder<'t>.CreateProperty<ControlTheme>(DataGridColumn.CellThemeProperty, value, ValueNone)
 
+        static member width<'t when 't :> DataGridColumn>(value: DataGridLength) : IAttr<'t> =
+            AttrBuilder<'t>.CreateProperty<DataGridLength>(
+                name = "width",
+                value = value,
+                getter = ValueSome (fun column -> column.Width),
+                setter = ValueSome (fun (column, value) -> column.Width <- value),
+                comparer = ValueNone
+            )
+
 [<AutoOpen>]
 module DataGridBoundColumn =
 

diff --git a/src/Examples/Examples.DataGridPlayground/Program.fs b/src/Examples/Examples.DataGridPlayground/Program.fs
@@ -36,10 +36,12 @@ type Views =
                         DataGrid.dock Dock.Top
                         DataGrid.isReadOnly false
                         DataGrid.items data.Current
+
                         DataGrid.columns [
                             DataGridTextColumn.create [
                                 DataGridTextColumn.header "Name"
                                 DataGridTextColumn.binding (Binding ("Name", BindingMode.TwoWay))
+                                DataGridTextColumn.width (DataGridLength(2, DataGridLengthUnitType.Star))
                             ]
                             DataGridTemplateColumn.create [
                                 DataGridTemplateColumn.header "Name"