module SFRenderWindow: sig
.. end
Online documentation for the RenderWindow class
type
t
type
window_style = [ `close | `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 -> bitsPerPixel:int -> video_mode
val settings : depthBits:int ->
stencilBits:int ->
antialiasingLevel:int -> version:int * int -> 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 clear : t -> SFColor.t -> unit
val blank : t -> unit
val getSettings : t -> context_settings
val getSize : t -> int * int
val getWidth : t -> int
val getHeight : t -> int
val setSize : t -> width:int -> height:int -> unit
val setSize2 : t -> size:int * int -> unit
val setMouseCursorVisible : t -> show: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 -> left:int -> top:int -> unit
val setPosition2 : t -> pos:int * 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