Module Bs4_form
module ROW : sig ... end
type status
=
|
Danger
|
Success
type field
=
{
id : string;
mutable cleave_option : string option;
mutable maker : (string -> Cleave.cleave Ocp_js.Js.t) option;
checker : (string -> string option) option;
mutable getter : string -> string;
}
include sig ... end
val fields : field list Stdlib.ref
val check : string -> (string, string) Stdlib.result
val check_or_fail : string -> string
val onchange : string -> unit
val get_value : string -> string
val select : ?width:int -> ?selected:Html_types.text Ocp_js.Html.wrap -> ?a:[< Html_types.select_attrib Class Id OnChange ] Ocp_js.Html.attrib list -> string -> ?onselect:(string -> unit) -> string Ocp_js.Html.wrap -> (string * Html_types.text Ocp_js.Html.wrap) list -> [> Html_types.div ] Ocp_js.Html.elt
val field : ?input_type:[< `Button | `Checkbox | `Color | `Date | `Datetime | `Datetime_local | `Email | `File | `Hidden | `Image | `Month | `Number | `Password | `Radio | `Range | `Reset | `Search | `Submit | `Tel | `Text | `Time | `Url | `Week Text ] Ocp_js.Html.wrap -> ?placeholder:Html_types.text Ocp_js.Html.wrap -> ?width:int -> ?a:[< Html_types.input_attrib Class Id Input_Type OnChange Placeholder ] Ocp_js.Html.attrib list -> ?maker:(string -> Cleave.cleave Ocp_js.Js.t) -> ?getter:(string -> string) -> ?checker:(string -> string option) -> ?cleave_option:string -> string -> onchange:(string -> unit) -> string Ocp_js.Html.wrap -> [> Html_types.div ] Ocp_js.Html.elt
val text : ?width:int -> ?a:[< Html_types.div_attrib Class ] Ocp_js.Html.attrib list -> string -> string Ocp_js.Html.wrap -> [< Html_types.span_content_fun ] Ocp_js.Html.elt -> [> Html_types.div ] Ocp_js.Html.elt
val textarea : ?placeholder:Html_types.text Ocp_js.Html.wrap -> ?rows:Html_types.number Ocp_js.Html.wrap -> ?width:int -> string -> onchange:(string -> unit) -> string Ocp_js.Html.wrap -> [> Html_types.div ] Ocp_js.Html.elt
val make_cleaves : unit -> unit
val update_cleave : id:string -> maker:(string -> Cleave.cleave Ocp_js.Js.t) -> cleave_option:string -> unit
val status_class : status -> string
val message : string -> status -> string Ocp_js.Html.wrap -> unit
val messages : string -> (status * string Ocp_js.Html.wrap) list -> unit
val wrap_onclick : string -> onclick:(unit -> unit) -> 'a -> bool
val button_without_confirm : ?a:[< Html_types.button_attrib Class OnClick ] Ocp_js.Html.attrib list -> ?classes:Html_types.nmtoken list -> string Ocp_js.Html.wrap -> onclick:(unit -> unit) -> [> Html_types.button ] Ocp_js.Html.elt
val enable_button : string -> unit
val disable_button : string -> unit
val counter : int Stdlib.ref
val button_with_confirm : ?a:[< Html_types.button_attrib Class OnClick ] Ocp_js.Html.attrib list -> ?classes:Html_types.nmtoken list -> string Ocp_js.Html.wrap Ocp_js.Html.wrap -> onclick:(unit -> unit) -> [> `Button | `Div ] Ocp_js.Html.elt list
val button : ?a:[< Html_types.button_attrib Class OnClick ] Ocp_js.Html.attrib list -> ?classes:Html_types.nmtoken list -> string Ocp_js.Html.wrap -> onclick:(unit -> unit) -> [> Html_types.button ] Ocp_js.Html.elt