sig
val cast : 'a Gobject.obj -> Gtk.adjustment Gtk.obj
module P :
sig
val lower : ([> `adjustment ], float) Gobject.property
val page_increment : ([> `adjustment ], float) Gobject.property
val page_size : ([> `adjustment ], float) Gobject.property
val step_increment : ([> `adjustment ], float) Gobject.property
val upper : ([> `adjustment ], float) Gobject.property
val value : ([> `adjustment ], float) Gobject.property
end
module S :
sig
val changed : ([> `adjustment ], unit -> unit) GtkSignal.t
val value_changed : ([> `adjustment ], unit -> unit) GtkSignal.t
end
val create : Gtk.adjustment Gobject.param list -> Gtk.adjustment Gtk.obj
val make_params :
cont:(([> `adjustment ] as 'a) Gobject.param list -> 'b) ->
'a Gobject.param list ->
?lower:float ->
?page_increment:float ->
?page_size:float ->
?step_increment:float -> ?upper:float -> ?value:float -> 'b
external create :
value:float ->
lower:float ->
upper:float ->
step_incr:float ->
page_incr:float -> page_size:float -> Gtk.adjustment Gtk.obj
= "ml_gtk_adjustment_new_bc" "ml_gtk_adjustment_new"
external clamp_page :
[> `adjustment ] Gtk.obj -> lower:float -> upper:float -> unit
= "ml_gtk_adjustment_clamp_page"
end