sfml 0.08.3 · OCaml Package

type t

val create : 
  mode:SFVideoMode.t ->
  title:string ->
  style:SFStyle.t list ->
  settings:SFContextSettings.t ->
  t

val createFromHandle : handle:nativeint -> settings:SFContextSettings.t -> t

val make : 
  ?style:SFStyle.t list ->
  ?bpp:int ->
  ?settings:SFContextSettings.t ->
  (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 clear : t -> SFColor.t -> unit

val blank : t -> unit

val getSettings : t -> SFContextSettings.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 setMouseCursorVisible : t -> show:bool -> unit

val setMouseCursorGrabbed : t -> grabbed:bool -> unit

val setVisible : t -> visible:bool -> unit

val setKeyRepeatEnabled : t -> enabled:bool -> unit

val setActive : t -> active:bool -> unit

val drawSprite : 
  t ->
  sprite:SFSprite.t ->
  ?states:SFRenderStates.t ->
  unit ->
  unit

val drawText : t -> text:SFText.t -> ?states:SFRenderStates.t -> unit -> unit

val drawShape : 
  t ->
  shape:SFShape.t ->
  ?states:SFRenderStates.t ->
  unit ->
  unit

val drawCircleShape : 
  t ->
  circle:SFCircleShape.t ->
  ?states:SFRenderStates.t ->
  unit ->
  unit

val setPosition : t -> pos:(int * int) -> unit

val setPosition2 : t -> left:int -> top:int -> unit

val setFramerateLimit : t -> limit:int -> unit

val setView : t -> view:SFView.t -> unit

val setVerticalSyncEnabled : t -> enabled:bool -> unit

val setJoystickThreshold : t -> threshold:float -> unit

val setTitle : t -> title:string -> unit

val pushGLStates : t -> unit

val popGLStates : t -> unit

val resetGLStates : t -> unit

val getView : t -> SFView.t

val capture : t -> SFImage.t

val getMousePosition : relativeTo:t -> int * int

val setMousePosition : relativeTo:t -> (int * int) -> unit

package sfml