2002-04-26 05:16:26 -07:00
|
|
|
##ifdef CAMLTK
|
|
|
|
|
|
|
|
|
|
val bind : widget -> tagOrId ->
|
|
|
|
|
(modifier list * xEvent) list -> bindAction -> unit
|
|
|
|
|
|
|
|
|
|
##else
|
|
|
|
|
|
1999-12-16 00:37:38 -08:00
|
|
|
val bind :
|
2000-04-12 18:11:06 -07:00
|
|
|
events: event list ->
|
|
|
|
|
?extend: bool ->
|
|
|
|
|
?breakable: bool ->
|
|
|
|
|
?fields: eventField list ->
|
|
|
|
|
?action: (eventInfo -> unit) ->
|
|
|
|
|
canvas widget -> tagOrId -> unit
|
2002-04-26 05:16:26 -07:00
|
|
|
|
|
|
|
|
##endif
|
