`sig
type color =
[ `BLACK
| `COLOR of Gdk.color
| `NAME of string
| `RGB of int * int * int
| `WHITE ]
val color : ?colormap:Gdk.colormap -> GDraw.color -> Gdk.color
type optcolor =
[ `BLACK
| `COLOR of Gdk.color
| `DEFAULT
| `NAME of string
| `RGB of int * int * int
| `WHITE ]
val optcolor : ?colormap:Gdk.colormap -> GDraw.optcolor -> Gdk.color option
class drawable :
?colormap:Gdk.colormap ->
([> `drawable ] as 'a) Gobject.obj ->
object
val mutable gc : Gdk.gc
val w : 'a Gobject.obj
method arc :
x:int ->
y:int ->
width:int ->
height:int ->
?filled:bool -> ?start:float -> ?angle:float -> unit -> unit
method color : GDraw.color -> Gdk.color
method colormap : Gdk.colormap
method depth : int
method gc : Gdk.gc
method gc_values : Gdk.GC.values
method line : x:int -> y:int -> x:int -> y:int -> unit
method lines : (int * int) list -> unit
method point : x:int -> y:int -> unit
method points : (int * int) list -> unit
method polygon : ?filled:bool -> (int * int) list -> unit
method put_image :
x:int ->
y:int ->
?xsrc:int ->
?ysrc:int -> ?width:int -> ?height:int -> Gdk.image -> unit
method put_layout :
x:int ->
y:int ->
?fore:GDraw.color -> ?back:GDraw.color -> Pango.layout -> unit
method put_pixbuf :
x:int ->
y:int ->
?width:int ->
?height:int ->
?dither:Gdk.Tags.rgb_dither ->
?x_dither:int ->
?y_dither:int -> ?src_x:int -> ?src_y:int -> GdkPixbuf.pixbuf -> unit
method put_pixmap :
x:int ->
y:int ->
?xsrc:int ->
?ysrc:int -> ?width:int -> ?height:int -> Gdk.pixmap -> unit
method put_rgb_data :
width:int ->
height:int ->
?x:int ->
?y:int ->
?dither:Gdk.Tags.rgb_dither ->
?row_stride:int -> Gpointer.region -> unit
method rectangle :
x:int ->
y:int -> width:int -> height:int -> ?filled:bool -> unit -> unit
method segments : ((int * int) * (int * int)) list -> unit
method set_background : GDraw.color -> unit
method set_clip_mask : Gdk.bitmap -> unit
method set_clip_origin : x:int -> y:int -> unit
method set_clip_rectangle : Gdk.Rectangle.t -> unit
method set_clip_region : Gdk.region -> unit
method set_foreground : GDraw.color -> unit
method set_gc : Gdk.gc -> unit
method set_line_attributes :
?width:int ->
?style:Gdk.GC.gdkLineStyle ->
?cap:Gdk.GC.gdkCapStyle -> ?join:Gdk.GC.gdkJoinStyle -> unit -> unit
method size : int * int
method string : string -> font:Gdk.font -> x:int -> y:int -> unit
end
class pixmap :
?colormap:Gdk.colormap ->
?mask:Gdk.bitmap ->
Gdk.pixmap ->
object
val bitmap : GDraw.drawable option
val mutable gc : Gdk.gc
val mask : Gdk.bitmap option
val w : Gdk.pixmap
method arc :
x:int ->
y:int ->
width:int ->
height:int ->
?filled:bool -> ?start:float -> ?angle:float -> unit -> unit
method color : color -> Gdk.color
method colormap : Gdk.colormap
method depth : int
method gc : Gdk.gc
method gc_values : Gdk.GC.values
method line : x:int -> y:int -> x:int -> y:int -> unit
method lines : (int * int) list -> unit
method mask : Gdk.bitmap option
method pixmap : Gdk.pixmap
method point : x:int -> y:int -> unit
method points : (int * int) list -> unit
method polygon : ?filled:bool -> (int * int) list -> unit
method put_image :
x:int ->
y:int ->
?xsrc:int ->
?ysrc:int -> ?width:int -> ?height:int -> Gdk.image -> unit
method put_layout :
x:int -> y:int -> ?fore:color -> ?back:color -> Pango.layout -> unit
method put_pixbuf :
x:int ->
y:int ->
?width:int ->
?height:int ->
?dither:Gdk.Tags.rgb_dither ->
?x_dither:int ->
?y_dither:int -> ?src_x:int -> ?src_y:int -> GdkPixbuf.pixbuf -> unit
method put_pixmap :
x:int ->
y:int ->
?xsrc:int ->
?ysrc:int -> ?width:int -> ?height:int -> Gdk.pixmap -> unit
method put_rgb_data :
width:int ->
height:int ->
?x:int ->
?y:int ->
?dither:Gdk.Tags.rgb_dither ->
?row_stride:int -> Gpointer.region -> unit
method rectangle :
x:int ->
y:int -> width:int -> height:int -> ?filled:bool -> unit -> unit
method segments : ((int * int) * (int * int)) list -> unit
method set_background : color -> unit
method set_clip_mask : Gdk.bitmap -> unit
method set_clip_origin : x:int -> y:int -> unit
method set_clip_rectangle : Gdk.Rectangle.t -> unit
method set_clip_region : Gdk.region -> unit
method set_foreground : color -> unit
method set_gc : Gdk.gc -> unit
method set_line_attributes :
?width:int ->
?style:Gdk.GC.gdkLineStyle ->
?cap:Gdk.GC.gdkCapStyle -> ?join:Gdk.GC.gdkJoinStyle -> unit -> unit
method size : int * int
method string : string -> font:Gdk.font -> x:int -> y:int -> unit
end
class type misc_ops =
object
method colormap : Gdk.colormap
method realize : unit -> unit
method visual_depth : int
method window : Gdk.window
end
val pixmap :
width:int ->
height:int ->
?mask:bool ->
?window:< misc : #GDraw.misc_ops; .. > ->
?colormap:Gdk.colormap -> unit -> GDraw.pixmap
val pixmap_from_xpm :
file:string ->
?window:< misc : #GDraw.misc_ops; .. > ->
?colormap:Gdk.colormap ->
?transparent:GDraw.color -> unit -> GDraw.pixmap
val pixmap_from_xpm_d :
data:string array ->
?window:< misc : #GDraw.misc_ops; .. > ->
?colormap:Gdk.colormap ->
?transparent:GDraw.color -> unit -> GDraw.pixmap
class drag_context :
Gdk.drag_context ->
object
val context : Gdk.drag_context
method status : ?time:int32 -> Gdk.Tags.drag_action option -> unit
method suggested_action : Gdk.Tags.drag_action
method targets : string list
end
end`