Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Module Ot_style

module Ot_style : sig..end

This module is an interface to getComputedStyle.


val parse_px : Js_of_ocaml.Js.js_string Js_of_ocaml.Js.t -> float option
val float_of_px : Js_of_ocaml.Js.js_string Js_of_ocaml.Js.t -> float
val px_of_float : float -> string
val style : 
  #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t ->
  Js_of_ocaml.Dom_html.cssStyleDeclaration Js_of_ocaml.Js.t
type display =  | Block | Compact | Flex | Inherit | Inline | Inline_block | Inline_flex | Inline_table | Initial | List_item | Marker | None | Run_in | Table | Table_caption | Table_cell | Table_column | Table_column_group | Table_footer_group | Table_header_group | Table_row | Table_row_group | Unknown
val display_to_str : display -> string
val display_of_str : string -> display
val display : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> string
val display' : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> display
val visibility : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> string
val invisible : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> bool

whether an element is currently invisible in the DOM (not the screen); you might want to do a Ot_nodeready.nodeready before.

val top : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float option
val bottom : 
  #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float option
val left : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float option
val right : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float option
val marginTop : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float
val marginBottom : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float
val marginLeft : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float
val marginRight : #Js_of_ocaml.Dom_html.element Js_of_ocaml.Js.t -> float
val set_top : 'a Eliom_content.Html.elt -> float -> unit
val set_bottom : 'a Eliom_content.Html.elt -> float -> unit
val set_left : 'a Eliom_content.Html.elt -> float -> unit
val set_right : 'a Eliom_content.Html.elt -> float -> unit
val set_width : 'a Eliom_content.Html.elt -> float -> unit
val set_height : 'a Eliom_content.Html.elt -> float -> unit