Module SFWindow

module SFWindow: sig .. end


Online documentation for the Window class
type t 
type window_style = [ `close | `default_style | `fullscreen | `resize | `titlebar ] 
type video_mode = {
   width :int;
   height :int;
   bitsPerPixel :int;
}
type context_settings = {
   depthBits :int;
   stencilBits :int;
   antialiasingLevel :int;
   majorVersion :int;
   minorVersion :int;
}
val mode : width:int -> height:int -> ?bpp:int -> unit -> video_mode
val settings : ?depth:int ->
?stencil:int ->
?antialiasing:int -> ?version:int * int -> unit -> context_settings
val create : mode:video_mode ->
title:string ->
style:window_style list ->
settings:context_settings -> t
val createFromHandle : handle:nativeint -> settings:context_settings -> t
val make : ?style:window_style list ->
?bpp:int ->
?depth:int ->
?stencil:int ->
?antialiasing:int -> ?version:int * int -> int * int -> string -> t
val isOpen : t -> bool
val close : t -> unit
val display : t -> unit
val destroy : t -> unit
val pollEvent : t -> SFEvent.t option
val waitEvent : t -> SFEvent.t
val getSize : t -> int * int
val getWidth : t -> int
val getHeight : t -> int
val setSize : t -> size:int * int -> unit
val setSize2 : t -> width:int -> height:int -> unit
val setPosition : t -> pos:int * int -> unit
val setPosition2 : t -> left:int -> top:int -> unit
val getPosition : t -> int * int
val setTitle : t -> title:string -> unit
val setActive : t -> active:bool -> bool
val setVisible : t -> visible:bool -> unit
val setMouseCursorVisible : t -> visible:bool -> unit
val setKeyRepeatEnabled : t -> enabled:bool -> unit
val setJoystickThreshold : t -> threshold:float -> unit
val setFramerateLimit : t -> limit:int -> unit
val setVerticalSyncEnabled : t -> enabled:bool -> unit
val getMousePosition : relativeTo:t -> int * int
val setMousePosition : relativeTo:t -> int * int -> unit