otherlibs/labltk/builtin/canvas_bind.mli


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

##ifdef CAMLTK

val bind : widget -> tagOrId ->
                    (modifier list * xEvent) list -> bindAction -> unit

##else

val bind :
  events: event list ->
  ?extend: bool ->
  ?breakable: bool ->
  ?fields: eventField list ->
  ?action: (eventInfo -> unit) ->
  canvas widget -> tagOrId -> unit

##endif