Previous  Up  Next

Module Menu

module Menu: sig .. end
The menu widget
val create : ?name:string ->
       ?activebackground:Tk.color ->
       ?activeborderwidth:int ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?borderwidth:int ->
       ?cursor:Tk.cursor ->
       ?disabledforeground:Tk.color ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?postcommand:(unit -> unit) ->
       ?relief:Tk.relief ->
       ?selectcolor:Tk.color ->
       ?takefocus:bool ->
       ?tearoff:bool ->
       ?tearoffcommand:(menu:Widget.any Widget.widget ->
                        tornoff:Widget.any Widget.widget -> unit) ->
       ?title:string ->
       ?typ:Tk.menuType -> 'a Widget.widget -> Widget.menu Widget.widget
create ?name parent options... creates a new widget with parent parent and new patch component name, if specified.
val activate : Widget.menu Widget.widget -> index:Tk.menu_index -> unit
val add_cascade : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?hidemargin:bool ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?menu:Widget.menu Widget.widget ->
       ?state:Tk.state -> ?underline:int -> Widget.menu Widget.widget -> unit
val add_checkbutton : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?offvalue:string ->
       ?onvalue:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?variable:Textvariable.textVariable -> Widget.menu Widget.widget -> unit
val add_command : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?label:string ->
       ?state:Tk.state -> ?underline:int -> Widget.menu Widget.widget -> unit
val add_radiobutton : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?value:string ->
       ?variable:Textvariable.textVariable -> Widget.menu Widget.widget -> unit
val add_separator : Widget.menu Widget.widget -> unit
val configure : ?activebackground:Tk.color ->
       ?activeborderwidth:int ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?borderwidth:int ->
       ?cursor:Tk.cursor ->
       ?disabledforeground:Tk.color ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?postcommand:(unit -> unit) ->
       ?relief:Tk.relief ->
       ?selectcolor:Tk.color ->
       ?takefocus:bool ->
       ?tearoff:bool ->
       ?tearoffcommand:(menu:Widget.any Widget.widget ->
                        tornoff:Widget.any Widget.widget -> unit) ->
       ?title:string -> ?typ:Tk.menuType -> Widget.menu Widget.widget -> unit
val configure_cascade : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?hidemargin:bool ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?menu:Widget.menu Widget.widget ->
       ?state:Tk.state ->
       ?underline:int -> Widget.menu Widget.widget -> Tk.menu_index -> unit
val configure_checkbutton : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?offvalue:string ->
       ?onvalue:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?variable:Textvariable.textVariable ->
       Widget.menu Widget.widget -> Tk.menu_index -> unit
val configure_command : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?label:string ->
       ?state:Tk.state ->
       ?underline:int -> Widget.menu Widget.widget -> Tk.menu_index -> unit
val configure_get : Widget.menu Widget.widget -> string
val configure_radiobutton : ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?value:string ->
       ?variable:Textvariable.textVariable ->
       Widget.menu Widget.widget -> Tk.menu_index -> unit
val delete : Widget.menu Widget.widget ->
       first:Tk.menu_index -> last:Tk.menu_index -> unit
val entryconfigure_get : Widget.menu Widget.widget -> Tk.menu_index -> string
val index : Widget.menu Widget.widget -> Tk.menu_index -> int
val insert_cascade : index:Tk.menu_index ->
       ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?hidemargin:bool ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?menu:Widget.menu Widget.widget ->
       ?state:Tk.state -> ?underline:int -> Widget.menu Widget.widget -> unit
val insert_checkbutton : index:Tk.menu_index ->
       ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?offvalue:string ->
       ?onvalue:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?variable:Textvariable.textVariable -> Widget.menu Widget.widget -> unit
val insert_command : index:Tk.menu_index ->
       ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?label:string ->
       ?state:Tk.state -> ?underline:int -> Widget.menu Widget.widget -> unit
val insert_radiobutton : index:Tk.menu_index ->
       ?accelerator:string ->
       ?activebackground:Tk.color ->
       ?activeforeground:Tk.color ->
       ?background:Tk.color ->
       ?bitmap:Tk.bitmap ->
       ?columnbreak:bool ->
       ?command:(unit -> unit) ->
       ?font:string ->
       ?foreground:Tk.color ->
       ?image:[< Tk.image ] ->
       ?indicatoron:bool ->
       ?label:string ->
       ?selectcolor:Tk.color ->
       ?selectimage:[< Tk.image ] ->
       ?state:Tk.state ->
       ?underline:int ->
       ?value:string ->
       ?variable:Textvariable.textVariable -> Widget.menu Widget.widget -> unit
val insert_separator : Widget.menu Widget.widget -> index:Tk.menu_index -> unit
val invoke : Widget.menu Widget.widget -> index:Tk.menu_index -> string
val popup : x:int -> y:int -> ?entry:Tk.menu_index -> Widget.menu Widget.widget -> unit
val post : Widget.menu Widget.widget -> x:int -> y:int -> unit
val postcascade : Widget.menu Widget.widget -> index:Tk.menu_index -> unit
val typeof : Widget.menu Widget.widget -> index:Tk.menu_index -> Tk.menuItem
val unpost : Widget.menu Widget.widget -> unit
val yposition : Widget.menu Widget.widget -> index:Tk.menu_index -> int