Added Doc.InputType.Decimal and Doc.InputType.DecimalUnchecked (#260)

* Added Doc.InputType.Decimal and Doc.InputType.DecimalUnchecked * build WS-Update * Reverted improper PackageReference. * Added Math.JS dependency * Use System.Decimal.TryParse
dotnet-websharper · Jan 13, 2023 · 45bec61 · 45bec61
1 parent 2bc962a
commit 45bec61
Show file tree

Hide file tree

Showing 16 changed files with 1,306 additions and 1,037 deletions.
diff --git a/WebSharper.UI.CSharp.Templating/CodeGenerator.fs b/WebSharper.UI.CSharp.Templating/CodeGenerator.fs
@@ -161,6 +161,8 @@ let buildHoleMethods (typeName: string) (holeName: HoleName) (holeDef: HoleDefin
                 s "Var<WebSharper.UI.Client.CheckedInput<int>>" "VarInt" "x"
                 sv "Var<double>" "VarFloatUnchecked" "x"
                 s "Var<WebSharper.UI.Client.CheckedInput<double>>" "VarFloat" "x"
+                sv "Var<decimal>" "VarDecimalUnchecked" "x"
+                s "Var<WebSharper.UI.Client.CheckedInput<decimal>>" "VarDecimal" "x"
             |]
         | HoleKind.Var ValTy.Bool ->
             [|

diff --git a/WebSharper.UI.CSharp/HTML.Client.fs b/WebSharper.UI.CSharp/HTML.Client.fs
@@ -91,6 +91,14 @@ module Html =
     [<Inline; CompiledName "input">]
     let FloatInput(var, [<ParamArray>] attrs: Attr[]) =
         Client.Doc.InputType.FloatUnchecked attrs var
+
+    /// Input box with type="number".
+    /// If the input box is blank, the value is set to 0.
+    /// If the input is not parseable as a decimal, the value is unchanged from its last valid value.
+    /// It is advised to use DecimalInput instead for better user experience.
+    [<Inline; CompiledName "input">]
+    let DecimalInput(var, [<ParamArray>] attrs: Attr[]) =
+        Client.Doc.InputType.DecimalUnchecked attrs var
 
     /// Input text area.
     [<Inline; CompiledName "textarea">]